Составить программу для нахождения значение выражения: (a+(d-12)*3)*(c-5*k), где значение переменных a,d,c,k вводят с клавиатуры.
190
201
Ответы на вопрос:
Var a, d, c, k: integer; begin read(a, d, c, k); writeln((a + (d - 12) * 3) * (c - 5 * k)) end.
Program n1; var a: array[1..15] of integer; min,i: integer; begin randomize; a[1]: =random(41)-20; min: =a[1]; for i: =2 to 15 do begin a[i]: =random(41)-20; if a[i]< min then min: =a[i]; end; write(min); end.
Популярно: Информатика
-
ангел8143315.07.2022 19:10
-
AnnWer07.11.2022 16:47
-
lerashherbakov13.01.2022 10:48
-
mishel788419.07.2022 05:09
-
ПоляБондарь28.10.2020 17:25
-
adrinaline29.05.2023 06:37
-
НаташаБатракова23.05.2020 12:40
-
katyakirdina1205.09.2021 09:27
-
петро2609.01.2021 16:34
-
kylie33303.11.2020 05:12