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

Вывести все двухзначные положительнык числа, кратные 5

  1. Ответ
    Ответ дан Аккаунт удален
    begin
    var x := 10;
    while x < 100 do
    begin
    writeln(x:3);
    x += 5;
    end;
    end.
  2. Ответ
    Ответ дан mmb1
    program del5;
    var
    x : integer;
    begin
    Сlrscr;
     x:=10
      while x<100 do
      begin
        writeln(x);
        x:=x+5;
      end
    end.
Самые новые вопросы