Напишите и протестируйте программу на языке Pascal. Вывести на экран рисунок из букв: Ж ЖЖЖ ЖЖЖЖЖ ЖЖЖЖЖЖЖ HH HH ZZZZZ
Ответ:
program RED;
Var
a:integer ;
begin
writeln ('Ж');
writeln ('ЖЖЖ');
writeln ('ЖЖЖЖЖ');
writeln ('ЖЖЖЖЖЖЖ');
writeln ('HH HH');
writeln ('ZZZZZ');
end.
Объяснение: