Дано четное число N (>

0) и символы C1 и C2. Вывести строку длины N,

которая состоит из чередующихся символов C1 и C2,

начиная с C1.

Question

Информатика

Катюня

10 мая, 17:03

Дано четное число N (>

0) и символы C1 и C2. Вывести строку длины N,

которая состоит из чередующихся символов C1 и C2,

начиная с C1.

+5

Ответы (1)

Знаете ответ на вопрос?

Кононыч · Answer 1

Program chisla;

var

a, n:integer;

c1, c2:char;

begin

writeln ('введите количество символов') ;

readln (n) ;

writeln ('введите сами символы') ;

readln (c1, c2) ;

if frac (n/2) = 0 then

for a:=1 to n div 2 do

begin

write (c1, c2) ;

end

else

begin

for a: = 1 to n div 2 do

begin

write (c1, c2) ;

end;

write (c1) ;

end;

end.

Дано четное число N (>0) и символы C1 и C2. Вывести строку длины N,которая состоит из чередующихся символов C1 и C2,начиная с C1.

Дано четное число N (>

0) и символы C1 и C2. Вывести строку длины N,

которая состоит из чередующихся символов C1 и C2,

начиная с C1.