Напишите программный код, который объявляет целочисленные переменные x и y, запрашивает ввод с клавиатуры чисел для этих переменных и выводит большее число
104
298
Ответы на вопрос:
Const n=10; var a: array[1..n] of real; k1,k2,i: integer; begin randomize; for i: =1 to n do begin a[i]: =2*random-1; write(a[i]: 7: 2); end; writeln; k1: =0; k2: =0; for i: =1 to n do if a[i]> 0 then k1: =k1+1 else k2: =k2+1; writeln('k1 = ',k1,' k2 = ',k2); writeln('количество положительных / количество отрицательных = ',k1/k2); end. пример: -0.85 0.53 -0.71 -0.14 0.53 -0.17 0.66 0.21 0.08 0.63 k1 = 6 k2 = 4 количество положительных / количество отрицательных = 1.5
Популярно: Информатика
-
ТвойВраг06.09.2020 09:00
-
ееее7006.09.2020 02:10
-
Еленка87129.08.2020 10:00
-
Оксана124130.10.2020 09:32
-
Forsenboy27.03.2021 01:55
-
UnderTakerDie16.12.2021 09:04
-
McVano11.08.2022 16:49
-
Емина22.05.2020 23:12
-
MAKAROSHKA133704.01.2020 07:39
-
эльза18210.05.2022 07:41