Составьте программу, которая :а) Определяет коды двух введённых с клавиатуры символов;б)Выполняет операцию сцепления трёх введённых с клавиатуры символов;на Pascal
Составьте программу, которая :
а) Определяет коды двух введённых с клавиатуры символов;
б)Выполняет операцию сцепления трёх введённых с клавиатуры символов;
на Pascal
Ответ(ы) на вопрос:
a)
var
ch1,ch2:char;
begin
readln(ch1,ch2);
writeln(ch1,'=',integer(ch1));
writeln(ch2,'=',integer(ch2));
end.
б)
var
a,b,c:char;
begin
readln(a,b,c);
writeln('Результат сцепления:',a+b+c);
end.
Не нашли ответ?
Похожие вопросы