Составьте программу на языке Паскаль, с помощью которой определите все четырехзначные номера машин, сумма двух двузначных чисел которых составляет 100

Question

Информатика

Венуся

22 февраля, 04:04

Составьте программу на языке Паскаль, с помощью которой определите все четырехзначные номера машин, сумма двух двузначных чисел которых составляет 100

+1

Ответы (1)

Знаете ответ на вопрос?

Елизаветка · Answer 1

Program kek; var a, b: real; i: integer; beginfor i : = 1000 to 10000 dobegin a : = i mod 100; b : = i div 100; if a + b = 100 then writeln (i) end; end.