Запишите на языке pascal следующие условия: 1.величина x-положительная 2.0 3.x не равно 10
290
324
Ответы на вопрос:
// pascalabc.net 3.2, сборка 1325 от 19.10.2016 begin var n: =readinteger('n='); var a: =readarrinteger('вводите элементы: ',n); a.sort; a.println; var s: =a[0]+a[n-1]; for var i: =1 to n-2 do s: =s+sqr(a[i]); writeln('s=',s) end. пример n= 5 вводите элементы: 4 1 3 2 5 1 2 3 4 5 s=35
Популярно: Информатика
-
Kefir4ek31.05.2021 06:37
-
ДарьяДуда30.04.2022 14:41
-
siniTamy20.11.2020 22:39
-
mariyalesnyak05.01.2020 15:27
-
никита349706.01.2020 15:30
-
mazaliaopera28.04.2021 13:59
-
Саляриум25.10.2022 17:31
-
ТвойЩенок27.08.2021 19:17
-
фокс3622.09.2022 02:43
-
ЗнающийМудрец09.03.2020 16:39