Предмет: Информатика, автор: mila2710

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

Ответы

Автор ответа: vladmor
0
var x,n: integer;
begin
  readln(x);
  repeat
    x:=x+5; n:=n+1;
  until x >100;
  writeln(n);
end.

Похожие вопросы
Предмет: Алгебра, автор: lilyfedorova2
Предмет: Биология, автор: olegbro2109
Предмет: Английский язык, автор: klepinina07