Аватар
Информатика, опубликовано 2018-08-22 23:32:06 by Гость

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

Аватар
Ответ оставил Гость

Var x,n: integer;
begin
  readln(x);
  repeat
    x:=x+5; n:=n+1;
  until x >100;
  writeln(n);
end.

Вопрос
Не нашли ответа?
Если вы не нашли ответа на свой вопрос, или сомневаетесь в его правильности, то можете воспользоваться формой ниже и уточнить решение. Или воспользуйтесь формой поиска и найдите похожие ответы по предмету Информатика.