Вопрос по информатике:
Даны две строки произвольного размера сформировать третью взяв из первой символы стоящие на чётных позициях, а из второй символы стоящие на нечётных позициях установив обе части на те же позиции
пожалуйста помогите и с решением пожалуйста(((
- 12.04.2018 07:05
- Информатика
- remove_red_eye 10927
- thumb_up 31
Ответы и объяснения 1
Uses crt;
var s1,s2,s3:string;
i:integer;
begin
writeln('Введите первую строку.');
readln(s1);
writeln('Введите вторую строку.');
readln(s2);
for i:=1 to min(length(s1),length(s2)) do
if i mod 20 then
s3:=concat(s3,s2[i])
else
s3:=concat(s3,s1[i]);
writeln(s3);
end.
- 13.04.2018 17:38
- thumb_up 10
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.