Найти все двузначные числа, в которых есть заданная цифра

@Julia161 · Регистрация: 19.12.2011

найти все двузначные числа, в которых есть заданная цифра.

@КонецСвета · 24.12.2011, 12:10

Pascal

uses crt;
var c,i: integer;
begin
write('Введите цифру ');
readln(c);
for i:=10 to 99 do
    if (i mod 10=c) or (i div 10=c) then
       writeln(i);
end.

@Julia161 0 / 0 / 0 Регистрация: 19.12.2011 Сообщений: 33
		1
	Найти все двузначные числа, в которых есть заданная цифра 24.12.2011, 12:07. Показов 4724. Ответов 1 Метки нет (Все метки) найти все двузначные числа, в которых есть заданная цифра. 0

Опции темы

Найти все двузначные числа, в которых есть заданная цифра

Решение