Напишите программу на языке Pascal, которая подсчитывает количество чисел кратных 8 в промежутке от n до 100
Ответы на вопрос
Ответил DonPedro80
0
var
n,i,k:integer;
begin
Write('n=');
Readln(n);
k:=0;
for i:=n to 100 do
if i mod 8 = 0 then Inc(k);
Writeln('k=',k);
end.
n,i,k:integer;
begin
Write('n=');
Readln(n);
k:=0;
for i:=n to 100 do
if i mod 8 = 0 then Inc(k);
Writeln('k=',k);
end.
Ответил Scania730
0
спасибо огромное
Ответил DonPedro80
0
не за что
Ответил Scania730
0
что такое inc ?
как он работает?
как он работает?
Ответил DonPedro80
0
Inc - инкремент (приращение). Эта конструкция введена в Паскаль еще его разработчиком, Н.Виртом. inc(k) равнозначно k:=k+1, т.е. inc увеличивает свой аргумент на 1. Есть еще dec(k) - декремент, уменьшающий значение аргумента на 1.
Ответил Scania730
0
спасибо огромное, можешь еще помочь, я там еще две задачки добавил!!!!
Новые вопросы