Задание:
Добрые люди, помогите пожалуйстаЗаменить цифры от 1 до 10 словами. Например: 1 — «один» и т.д. помогите составить программу и блок-схему.
Решение:
Var k: integer; beginread (k); if k=1 then write ('один'); if k=2 then write ('два'); if k=3 then write ('три'); if k=4 then write ('четыре'); if k=5 then write ('пять'); if k=6 then write ('шесть'); if k=7 then write ('семь'); if k=8 then write ('восемь'); if k=9 then write ('девять'); if k=10 then write ('десять'); end.
Знаете другой ответ?