Написать программу определяющая количество отрицательных двузначных четырём кратных 8 элементов массива

друг100 друг100    3   09.12.2021 17:47    0

Ответы
erenina88 erenina88  09.12.2021 17:50

var

 i, s : integer;

begin

s:= 0;

for i:=10 to 99 do

if i mod 8 = 0 then

  begin

    s:= s + 1;

    writeln(i);

  end;

writeln('текст = ', s);

writeln;

end.

Объяснение:

Это код

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика