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

@Spawnn · Регистрация: 09.01.2010

Author24 — интернет-сервис помощи студентам

1. Построить блок-схему и решить задачу, используя цикл с предусловием: Вывести на экран все трехзначные числа, сумма первой и третьей цифры которых больше второй цифры.
2. Решить предыдущую задачу и построить блок-схему, используя цикл с постусловием

@кот Бегемот · 10.01.2010, 19:36

Сообщение от Spawnn

1. Построить блок-схему и решить задачу, используя цикл с предусловием: Вывести на экран все трехзначные числа, сумма первой и третьей цифры которых больше второй цифры.
2. Решить предыдущую задачу и построить блок-схему, используя цикл с постусловием

Pascal

var
i:integer;
begin
i:=100;
while i<1000 do
begin
if i mod 10+i div 100>(i div 10)mod 10 then write(i,' ');
inc(i);
end;
readln;
end.

Pascal

var
i:integer;
begin
i:=100;
repeat
if i mod 10+i div 100>(i div 10)mod 10 then write(i,' ');
inc(i);
until i=1000;
readln;
end.

@Spawnn 2 / 2 / 0 Регистрация: 09.01.2010 Сообщений: 43
		1
	Вывести на экран все трехзначные числа, сумма первой и третьей цифры которых больше второй цифры. 10.01.2010, 18:46. Показов 3559. Ответов 1 Метки нет (Все метки) 1. Построить блок-схему и решить задачу, используя цикл с предусловием: Вывести на экран все трехзначные числа, сумма первой и третьей цифры которых больше второй цифры. 2. Решить предыдущую задачу и построить блок-схему, используя цикл с постусловием 0

	10.01.2010, 19:36

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

Решение