1. дано натуральное число а. если а - четное, то вывести косинус числа а и квадратный корень из числа а, иначе вывести синус числа а и квадрат числа а. 2. найти решение квадратного уравнения, если известны его коэффициенты. 3. ввести 5 действительных чисел. найти их сумму. 4. дано натуральное число n. ввести n целых чисел. найти их произведение. 5. ввести последовательность ненулевых чисел. найти произведение элементов последовательности. 6. ввести последовательность ненулевых чисел. найти кол-во четных элементов последовательности. 7. найти наибольший общий делитель натуральных чисел а и b.
179
432
Ответы на вопрос:
1)var a: integer; begin read(a); if a mod 2 = 0 then writeln(cos(a),' ',sqrt(a)) else writeln(sin(a),' ', sqr(a)); end. 4) var i,n,k: integer; begin for i: =1 to n do begin read(n); k: =k*n; end; writeln(k); end.
Using system; namespace consoleapp0{ class program { static void main(string[] args) { int a = int.parse(console. b = int.parse(console.; if (a % b == 0 || b % a == 0) console.writeline("делится"); else console.writeline("не делится"); console.readkey(true); } }}
Популярно: Информатика
-
POMIDOrio14.09.2022 03:42
-
alpet0325.09.2020 17:12
-
katyakot229908.09.2021 12:28
-
МЯУСИМ200713.11.2022 09:01
-
Evlampy310.07.2021 16:01
-
дима12316310.02.2021 22:24
-
helooooo13.10.2022 03:27
-
farangizuk23.02.2020 10:09
-
Ilyapopovsky1000112.02.2021 01:55
-
Maksim12345126.09.2021 15:46