составить программу, которая строит ряд из n знаков "*" , m знаков "!" и n знаков "*" если n<m
Ответы на вопрос
Ответил blowberryninja
0
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.
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.
Ответил HRAshton
0
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.
По условию так =)
begin
readln(n, m);
for i := 1 to n do write('*');
writeln;
if (n < m) then
for i := 1 to m do write('!');
end.
По условию так =)
Новые вопросы
Қазақ тiлi,
2 года назад
Русский язык,
2 года назад
Математика,
10 лет назад
Математика,
10 лет назад
Математика,
10 лет назад