Как написать на Паскале программу, которая вводит с клавиатуры N произвольных целых чисел и ищет их сумму? (Число N тоже вводится с клавиатуры.)
Как разработать для созданной программы не менее трёх тестов и проверить на них правильность работы алгоритма?

222

416

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

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

котик8308

Информатика

4,8(26 оценок)

Var a,a1,a2: integer; begin readln(a); a1: =a div 1000; a2: =a div 100 mod 10; if a2*10+a1 = a mod 100 then writeln(1) else writeln(0); end. пример: 1221 1

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

Темы

Получить
полный доступ

150 000+ пользователей

Оформить подписку