Помогите составить программу в паскале которая рисует букву К, Ю, М Заранее спасибо! Выберу лучший !
Ответы
Ответ дал:
0
var s,s1:string; p:byte;
begin readln(s); for p:=length(s) downto 1 do s1:=s1+s[p];
writeln(s1); end.
begin readln(s); for p:=length(s) downto 1 do s1:=s1+s[p];
writeln(s1); end.
Ответ дал:
0
че за бред
Похожие вопросы
2 года назад
2 года назад
7 лет назад
7 лет назад
10 лет назад
10 лет назад
10 лет назад