В FreePascale вывести числа в виде таблицы используя команду цикла 5 55 555
В FreePascale вывести числа в виде таблицы используя команду цикла
5
55
555
Гость
Ответ(ы) на вопрос:
Гостьvar a:integer;
b,c:string;
begin
b:='*';
c:='';
for a:=1 to 3 do begin
c:=c+b;
writeln(c);
end;
end.
Не нашли ответ?
Похожие вопросы