Напишите программу на языке Pascal, которая подсчитывает количество чисел кратных 8 в промежутке от n до 100
Ответы
Ответ дал:
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.
Ответ дал:
0
спасибо огромное
Ответ дал:
0
не за что
Ответ дал:
0
что такое inc ?
как он работает?
как он работает?
Ответ дал:
0
Inc - инкремент (приращение). Эта конструкция введена в Паскаль еще его разработчиком, Н.Виртом. inc(k) равнозначно k:=k+1, т.е. inc увеличивает свой аргумент на 1. Есть еще dec(k) - декремент, уменьшающий значение аргумента на 1.
Ответ дал:
0
спасибо огромное, можешь еще помочь, я там еще две задачки добавил!!!!
Вас заинтересует
2 года назад
2 года назад
3 года назад
10 лет назад