Question

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

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
Это девять