Составить программу на языке паскаль для преобразования цифр в слова.
var
c:integer;
begin
write(Введите цифру ); readln(c);
case c of
0: writeln(Ноль);
1: writeln(Один);
2: writeln(Два);
3: writeln(Три);
4: writeln(Четыре);
5: writeln(Пять);
6: writeln(Шесть);
7: writeln(Семь);
8: writeln(Восемь);
9: writeln(Девять);
end;
end.
Так что ли?
Оцени ответ
