- 15.10.2017 09:32
- Информатика
- remove_red_eye 15454
- thumb_up 8
Ответы и объяснения 1
var
a: integer;
begin
readln(a);
foreach c: char in a.ToString() do
case c of
'1': write('один ');
'2': write('два ');
'3': write('три ');
'4': write('четыре ');
'5': write('пять ');
'6': write('шесть ');
'7': write('семь ');
'8': write('восемь ');
'9': write('девять ');
'0': write('ноль ');
end;
end.
- 16.10.2017 13:55
- thumb_up 50
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.