Впроизвольном массиве а(15) на интервале (-50; 50), найти наибольший элемент.
221
396
Ответы на вопрос:
// pascalabc.net 3.1, сборка 1174 от 22.02.2016 begin writeln('max=',arrrandom(15,-50,50).println.max) end. тестовое решение: 12 -3 -6 50 -48 16 14 4 24 -9 42 7 20 45 46 max=50
program zadanie1; var a,b:real; begin writeln('Введите числа'); readln(a); readln(b); writeln(a*b); end.program zadanie2; var a:real; begin writeln('Введите сторону'); readln(a); writeln('S=',a*a); writeln('P=',4*a) ;end.program zadanie3; var a,b,c:real; begin writeln('Введите стороны'); readln(a); readln(b); c:=(a*b)/2; writeln('S=',c); end.
Вот, вроде.
Объяснение:
Популярно: Информатика
-
chuksin200812.11.2020 03:18
-
matany5713.04.2022 21:23
-
Nathoe78925.02.2023 09:54
-
funny4331.01.2022 11:27
-
jennie08201716.06.2021 02:52
-
kaaanrakun23.08.2022 03:56
-
Olga161813.07.2020 11:15
-
zlatoslava2p08lf030.03.2022 11:50
-
sot5831.12.2021 23:55
-
Marmanril1206.11.2022 14:19