Ввести число от 5 до 9.Вывести его значение словом.Turbo Pascal
Ввести число от 5 до 9.Вывести его значение словом.Turbo Pascal
Задать свой вопрос1 ответ
Taisija Zvjagelskaja
program zz1;
var a:integer; // вводим переменные целого типа
begin
write( введите данное число от 5 до 9 ); // вводим с клавиатуры число
read(a);
if a = 5 then write( 5 ); // проверяем, если введенное число равно 5, то выводим один ответ
if a = 6 then write( 6 );// проверяем, если введенное число одинаково 6, то выводим иной ответ
if a = 7 then write( Семь );// проверяем, если введенное число одинаково 7, то выводим третий ответ
if a = 8 then write( Восемь );
if a = 9 then write( Девять );
end.
, оставишь ответ?
Похожие вопросы
-
Вопросы ответы
Новое
NEW
Статьи
Информатика
Статьи
Последние вопросы
Помогите пожалуйста написать Сочинение Овчинникова "победитель'
Литература.
Здравствуйте. Нужен цитатный план испытания лётчика в лесу главы2-13 по повести
Разные вопросы.
Я хочу найти решение и ответ для этой задачи и получить
Математика.
Здравствуйте
Меня зовут Виталий, я AdOps-аналитик компании Adfinity.pro
Заинтересовал ваш проект obrazovalka.com
Думаю сможем увеличить
Разные вопросы.
мне очень срочно нужно сочинение по рассказу экспонат номер по дной
Литература.
мне очень срочно нужно сочинение по рассказу экспонат номер по дной
Литература.
В семье из трех человек три электронных устройства: ноутбук, планшет и
Разные вопросы.
Жаркыраган кашка маш жаралгандан ашка маш табышмак жообу менен
Кыргыз тили.
За лето подруги прочитали 48 книг.Причем Оля прочитала в 3 раза
Математика.
Периметр равнобедренного треугольника ABC (AB=BC) равен 34 см. Периметр треугольника ABM,
Разные вопросы.
Облако тегов