Предмет: Информатика, автор: zeitun45

Пожалуйста подскажите как напечатать такое в программе аbc Паскаль? Куда нажимать?

Приложения:

Ответы

Автор ответа: gfhjkmgfhjkm20
1

Ответ:

program z1;

var i,j: integer;

begin

for i:=1 to 3 do

begin

for j:=1 to i-1 do write(' ');

for j:=i to 3 do write('* ');

writeln

end

end.


zeitun45: А сами звёздочки кучкой как напечатать?
gfhjkmgfhjkm20: Может я не правильно понял, что вам надо?
Может так?
program z1;
uses GraphABC;
begin
SetWindowSize(100,100);
SetFontSize (55);
DrawTextCentered(59,55,'***');
DrawTextCentered(59,75,'**');
DrawTextCentered(59,95,'*')
end.
zeitun45: Да, спасибо большое
Похожие вопросы
Предмет: Математика, автор: BroHAVA