Срочно! В Паскале ABC. Дано слово S1 получить слово S2 образованное буквами слова S1,…

Question

79

Срочно! В Паскале ABC. Дано слово S1 получить слово S2 образованное буквами слова S1, стоящими на четных местах. Решить циклом с параметром. Заранееспасибо.

категория: информатика

ответить

в избранное ссылка

Знаете ответ?

sevkelt · Accepted Answer

85

sevkelt

04 августа 2022

Program Slova; Uses Crt; var s1,s2: string; i,k: integer; begin clrscr; s2: ='; write ('Введите слово: '); readln (s1); k: =length (s1); for i: =1 to k do if (i mod 2)=0 then s2: =s2+s1[i]; writeln ('Полученное слово: ',s2); readkey; end.

комментировать

в избранное ссылка отблагодарить

Email:
Пароль:
	забыли пароль?

Логин:
Email:
Пароль: