Ответы на вопрос:
Var i,d: integer; n: array[1..3] of integer; begin writeln('введите диапазон( от 0 до '); readln(d); randomize; for i: = 1 to 3 do beginn[i]: =random(d+1); writeln(n[i]); end; if n[1]= n[2]+n[3] then writeln('yes') else writeln('no'); end.
Популярно: Информатика
-
Sova55113.02.2023 14:08
-
astratovamaria19.01.2023 15:31
-
dildora140995p01blz28.03.2023 10:13
-
Skelet00124.07.2022 22:08
-
АсияТулемисовна14.07.2022 23:49
-
vitalinabelova109.02.2023 06:44
-
LilNooqas21.01.2022 18:38
-
dragons55u30.05.2022 05:43
-
missvictoriak14.04.2022 08:22
-
katiy1999110.11.2021 09:16