profile
Опубликовано 5 лет назад по предмету Информатика от temoxaekb

выведите на экран числа кратные четырем в диапазоне от 230 до 297 располодив их по убыванию и укажите их количеств

  1. Ответ
    Ответ дан pacixor
    var
      i, k: integer;
    begin
    k := 0;

    for i := 297 downto 230 do
      if i mod 4 = 0 then
      begin
        write(i, ' ');
        k := k + 1;
      end;
     
    writeln(#13+'Количество = ', k);
    end.
Самые новые вопросы