Создайте программу которая запрашивает однозначное число и сообщает его название...

Question

Создайте программу которая запрашивает однозначное число и сообщает его название
Однозначное число: 8
Это число восемь
на паскале плиз

Comments

Есть рамки какие-то?

---

рамок нет, но чтобы в пределах девятого класса решения было

---

можешь другое решить

---

плиз

---

числитель и знаменатель: 17 3

---

17/3=5 2/3

---

составьте программу которая запрашивает числитель и знаменатель неправильной дроби и выделяет целую часть

---

//PascalABC.NET//Версия 3.3, сборка 1634 (14.02.2018)begin var (a,b):=ReadInteger2('Введите числитель и знаменатель->'); if a-a div b*b=0 then Writeln(a,'/',b,'= ',a div b) else Writeln(a,'/',b,'= ',a div b,' ',a-a div b*b,'/',b)end.

---

Пример:

---

Введите числитель и знаменатель-> 17 317/3= 5 2/3

Answer 1

Program v1;
Var  n: integer;
 Begin 
 Write ('Введите однозначное число: '); 
 Readln(n);  
Case n of 
 1: Write ('Единица');
 2: Write ('Два'); 
3: Write ('Три'); 
4: Write ('Четыри');
 5: Write ('Пять');
 6: Write ('Шесть'); 
7: Write ('Семь'); 
8: Write ('Восемь'); 
9: Write ('Девять') 
 else Write ('Вы ввели не однозначное число!!!');End;
End.

Answer 2

//PascalABC.NET
//Версия 3.3, сборка 1634 (14.02.2018)

begin
  var m1:=Arr('ноль','один','два','три','четыри','пять','шесть','семь','восемь','девять');
  Println('Это',m1[ReadInteger]);
end.

Пример:
9
Это девять