Дано слово s1.получить слово s2, образованное нечетными - вопрос №1513429121 от Kovik12345 06.06.2023 00:36

Question

Информатика: Дано слово s1.получить слово s2, образованное нечетными буквами слова s1.

Kovik12345 · Answer

var a:integer;var s1,s2:string;begin  inc(a);  write( Vvedite slovo: );  readln(s1);  repeat   s2:=s2+s1[a];   a:=a+2;  until(a length(s1));  writeln(s2);  readln;end....