Написать программу в паскале которая рисует звездочки на весь экран вот так: * ** *** **** ****** ******* и так далее до конца экрана
113
294
Ответы на вопрос:
Var n,k: integer; begin k: =0; while k> =0 do begin k: = k+1; for n: =1 to k do begin write('*'); end; writeln; end; end.
Популярно: Информатика
-
Logutova21.02.2023 09:16
-
Omg55russ12.05.2023 12:32
-
DenZag22.12.2020 10:40
-
sharamat200108.03.2022 09:39
-
superpuperkrosh27.03.2021 19:38
-
agarkovr8322.04.2023 07:16
-
Sa6ok119.09.2022 03:42
-
yadron5429.07.2020 08:28
-
daniellarussel109.10.2021 22:57
-
Ajjr115.08.2021 04:09