"for" pascalabc.net даны целые числа k и n (n> 0). вывести n раз число k.
268
475
Ответы на вопрос:
Program n1; var k,i: integer; n: byte; begin write('введите число: '); readln(k); write('введите кол-во раз: '); readln(n); if(n> 0) then for i: =1 to n do writeln(k); end.
Популярно: Информатика
-
Nikia126.04.2020 22:09
-
ДашаЕ108.02.2020 06:57
-
Маришка123109.06.2022 12:46
-
adelyavalieva119.06.2023 20:57
-
DmitryKind9802.04.2020 08:38
-
Tanya3132330.08.2022 13:23
-
jungkook01099714.09.2020 00:42
-
shcherboroma03.04.2021 10:35
-
katyaarxipova07.11.2020 02:35
-
099678418.04.2021 01:48