Пока число х не станет большим 100 прибавлять к нему число 5 , посчитать сколько раз оно было прибавлено( решить через программу паскаль) через repeat решить

16120000 16120000    2   22.07.2019 18:10    0

Ответы
Var x,n: integer;
begin
  readln(x);
  repeat
    x:=x+5; n:=n+1;
  until x >100;
  writeln(n);
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика