Регистрация
mzhenyak1999
Есть ответ 👍

Запитання до вогник далеко в степу
​

170
182
Посмотреть ответы 2

Ответы на вопрос:

vereshchako041
vereshchako041
4,7(36 оценок)

Что за вопрос?

Объяснение:

Напиши понятней)

kopanenkoanutaoyp3as
kopanenkoanutaoyp3as
4,8(68 оценок)
uses crt;
 
var n: string;
     i: integer;
 
 
begin clrscr;
write('Введите число (числа): '); readln(n);
for i := 1 to length(n) do
 case n[i] of
  '0': write('zero ');
  '1': write('one ');
  '2': write('two ');
  '3': write('three ');
  '4': write('four ');
  '5': write('five ');
  '6': write('six ');
  '7': write('seven ');
  '8': write('eight ');
  '9': write('nine ');
  end;
readkey; end.

Популярно: Другие предметы