Регистрация
kris0603
17.09.2020 23:49
Информатика
Есть ответ 👍

Напишите программу, которая находит количество двузначных чисел, которые делятся на 7. Используйте оператор for с переменной в диапазоне от 10 до 100 ( in range (10,100) )
Подсказка. Проверить условие можно, используя операцию %

Если N%7==0 - число делится на 7

Пришлите скриншот выполненной программы с выходными данными. Составьте блок-схему алгоритма программы.

3. Составьте таблицу пошагового изменения значений переменных a и k в ходе выполнения программы:
a=20
for k in range(4,7):
a=a-k

k a
20
4
5
6

288
314
Посмотреть ответы 1

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

katiy19991
katiy19991
4,7(91 оценок)
Var a,b,c: real; begin write('введите a,b,c: '); readln(a,b,c); if (a> =b)and(b> =c) then begin a: =a*2; b: =b*2; c: =c*2; end else begin a: =abs(a); b: =abs(b); c: =abs(c); end; writeln('a = ',a: 2: 2,' b = ',b: 2: 2,' c = ',c: 2: 2); readln; end.

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