Предмет: Информатика,
автор: gleb19990408
Составьте программу, которая выводит только нечетные символы введенного текса.
это по паскалю авс
Ответы
Автор ответа:
0
var s:string; i:integer;
begin
writeln('Введите строку');
readln(s);
for i:=1 to length(s) do
if i mod 2 =1 then write(s[i]);
end.
begin
writeln('Введите строку');
readln(s);
for i:=1 to length(s) do
if i mod 2 =1 then write(s[i]);
end.
Интересные вопросы
Предмет: Математика,
автор: Аноним
Предмет: Химия,
автор: romap7364
Предмет: География,
автор: Аноним
Предмет: Информатика,
автор: swanwhite