Вывести на экран все положительные трехзначные числа, сумма первой и третьей цифры которых равна второй цифры

@yeahbaby · Регистрация: 18.01.2015

@volvo · 04.10.2012, 21:05

Pascal

var
   i : integer;
begin
   for i := 100 to 999 do
      if (i mod 10) + (i div 100) = ((i div 10) mod 10) then writeln(i);
end.

@yeahbaby 0 / 0 / 0 Регистрация: 18.01.2015 Сообщений: 2
		1
	Вывести на экран все положительные трехзначные числа, сумма первой и третьей цифры которых равна второй цифры 04.10.2012, 20:37. Показов 1401. Ответов 1 Метки нет (Все метки) Вывести на экран все положительные трехзначные числа, сумма первой и третьей цифры которых равна второй цифры 0

Опции темы

Решение