Предмет: Информатика,
автор: mila2710
пока число х не станет большим 100 прибавлять к нему число 5 , посчитать сколько раз оно было прибавлено( решить через программу паскаль) через repeat решить
Ответы
Автор ответа:
0
var x,n: integer;
begin
readln(x);
repeat
x:=x+5; n:=n+1;
until x >100;
writeln(n);
end.
begin
readln(x);
repeat
x:=x+5; n:=n+1;
until x >100;
writeln(n);
end.
Похожие вопросы
Предмет: Русский язык,
автор: happymariam1985
Предмет: Алгебра,
автор: lilyfedorova2
Предмет: Биология,
автор: olegbro2109
Предмет: Математика,
автор: olqaulovskaya
Предмет: Английский язык,
автор: klepinina07