Составьте программу, которая для введенной цифры (0-9) выводит соответствующее ей название на английском - Turbo Pascal

Формулировка задачи:

Составьте программу, которая для введенной цифры (0-9) выводит соответствующее ей название на английском (0-zero 1- one 2- two ...). Составление и отладка программ с использованием оператора выбора Заранее Большое Спасибо, Уважаемые! Добавлено через 10 часов 3 минуты up!

Код к задаче: «Составьте программу, которая для введенной цифры (0-9) выводит соответствующее ей название на английском - Turbo Pascal»

textual
var
  n: integer;
 
begin
  Readln(n);
  case n of
    0: Writeln('Zero');
    1: Writeln('One');
    2: Writeln('Two');
    3: Writeln('Three');
    4: Writeln('Four');
    5: Writeln('Five');
    6: Writeln('Six');
    7: Writeln('Seven');
    8: Writeln('Eight');
    9: Writeln('Nine');
  else
    Writeln( '<Error>');
  end;
  Readln
end.

15   голосов, оценка 4.200 из 5


СОХРАНИТЬ ССЫЛКУ
Похожие ответы