составить программу, которая строит ряд из n знаков "", m знаков "!" и n знаков "" если n

Question

Информатика

Христиана

6 апреля, 14:53

составить программу, которая строит ряд из n знаков "", m знаков "!" и n знаков "" если n

+2

Ответы (2)

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

Феофилакт · Answer 1

Program mrs3;

var i, m, n:integer;

begin

writeln ('m=') ; readln (m) ;

writeln ('n=') ; readln (n) ;

if m>n then begin

for i:=1 to n do write ('*') ;

for i:=n to m do write ('!') ;

for i:=m downto n do write ('*') ;

end; end.

Авдоша · Answer 2

Var m, n, i: integer;

begin

readln (n, m) ;

for i : = 1 to n do write ('*') ;

writeln;

if (n < m) then

for i : = 1 to m do write ('!') ;

end.

По условию так =)

составить программу, которая строит ряд из n знаков "*", m знаков "!" и n знаков "*" если n

составить программу, которая строит ряд из n знаков "", m знаков "!" и n знаков "" если n