Написать программу, которая заменяет все цифры в заданной строке соответствующим...

0 голосов
73 просмотров

Написать программу, которая заменяет все цифры в заданной строке соответствующим словесным названием (1 – one, 2 – two, 3 –three и т.д.)
Язык программирования паскаль.


Информатика (18 баллов) | 73 просмотров
0

Тип данных должен быть string (строки)

Дан 1 ответ
0 голосов

Var a: integer;
begin  writeln('введи цифру (1-9)'); 
readln(a); 
if a=1 then writeln ('One'); 
if a=2 then writeln ('Two '); 
if a=3 then writeln ('Three');
if a=4 then writeln ('Four');
if a=5 then writeln ('Five'); 
if a=6 then writeln ('Six'); 
if a=7 then writeln ('Seven'); 
if a=8 then writeln ('Eight'); 
if a=9 then writeln ('Nine');
end.
 

(101 баллов)
0

это не то решение надо использовать строки!