Написать программу поиска трехзначных чисел таких что что если к сумме цифр этого числа прибавить квадрат этой суммы то получится это число?

В Паскале и не замудренно, циклы

var i, sum: integer; begin for i := 100 to 999 do begin // сотни + десятки + единицы sum := (i div 100) + ((i div 10) mod 10) + (i mod 10); // если условие верно - печатаем if sum + sum *... Читать далее

Сергей Куриленко6 лет341

Хорошо знаю математику, информатику и физику. Разбираюсь в компьютерах и смартфонах.

Какие циклы есть в Паскале?

Анонимный вопрос · 1 ответ

В языке программирования Pascal есть 3 вида циклов:

1. Цикл со счетчиком (for )

2. Цикл с предусловием (while)

3. Цикл с постусловием (repeat)