баллов!!!
НУЖНО СДЕЛАТЬ РЕФЕРАТ ПО ИНФОРМАТИКЕ ПО ПУНКТАМ
КТО СДЕЛАЕТ МОГУ СВЕРХУ НАКИНУТЬ ДЕНЕГ ЕЩЕ
ОТВЕТ НУЖЕН ИМЕННО В ВОРДЕ!!!!!
126
392
Ответы на вопрос:
Program z; var a: array [1..40] of integer; i,k,max,min,n,x: integer; begin read(n,x); for i: =1 to n do a[i]: =random(x); min: =a[1]+a[2]+a[3]; max: =0; for i: =1 to n-2 do begin if a[i]+a[i+1]+a[i+2]< min then min: =a[i]+a[i+1]+a[i+2]; if a[i]+a[i+1]+a[i+2]> max then begin max: =a[i]+a[i+1]+a[i+2]; k: =i; end; end; write(min,' '); write(k); end. x-максимальное число n-количество элементов в массиве
Популярно: Информатика
-
maks232414.05.2020 06:19
-
tim2003np0acpp02.06.2020 12:11
-
megaandreychuk22.02.2020 11:16
-
алалала415.05.2020 21:42
-
alinabilalova16104.10.2020 18:22
-
лав3524.09.2020 11:09
-
AfinaBi23.08.2020 15:03
-
olesyamolyanova10.09.2021 23:44
-
sndzhychayana23.11.2022 07:14
-
Leralove2005116.04.2021 19:38