Регистрация
Animashka11
31.05.2020 18:52
Информатика
Есть ответ 👍

Информатика 8 класс очень ​

124
343
Посмотреть ответы 1

Ответы на вопрос:

sainegorova201
sainegorova201
4,7(75 оценок)

var i,k:integer;

begin

k:=0;

for i:=10 to 80 do

if i mod 7=0 then k:=k+1;

write('Чисел, кратных 7=',k);

readln

end.

Популярно: Информатика