Регистрация
sveronika00
25.03.2021 16:08
Информатика
Есть ответ 👍

Практическая работа: на составление алгоритма способом программы​

294
344
Посмотреть ответы 1

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

Milintin25
Milintin25
4,8(60 оценок)
Возможно нерационально но, пусть. сначала вы вводите количество чисел, потом сами числа. если число делится на 7 - то будет соответствующая строка, после чего  будет предложено ввести новое число; если нет, то будет предложено ввести новое число. program cv; var a,i,chislo: integer; begin writeln ('введите количество чисел'); readln (a); for i: =1 to a do begin writeln ('введите число'); readln (chislo); if (chislo mod 7=0) then writeln ('число ',chislo,' делится на 7.') end; end.

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