Опубликовано 09.06.2017 по предмету Информатика от Гость >> <<

паскаль! из слова "вертикаль" - вывести слова: "тир" "ветка"

Ответ оставил Гость

var r,d,s: string; 
begin 
r:= вертикаль ; 
d:= r[4]+r[5]+r[3]; 
s:= r[1]+r[2]+r[4] +r[6]+r[7]; 
writeln(d,s) 
end.