Помогите пожалуйста  . Вводится число от 1 до 10. Дать название этого числа (1 - один , 2 - два , …, 10 - десять); Надо писать так:

Var a:integer;
begin
readln(a)
if a:=1 then writeln('1 - один');
 if a:=2 then writeln('2 - два');
 if a:=3 then writeln('3 - три');
 if a:=4 then writeln('4 - четыре');
. . .{по аналогии}
end.
а как писать то что в скобка(1- один) по английски или просто так odin?
Please enter comments
Please enter your name.
Please enter the correct email address.
You must agree before submitting.

Copyright © 2024 SCHOLAR.TIPS - All rights reserved.