Исправьте ошибку в программе program 1cl; var a: array[1..50] of integer; i,j,k,s: integer; begin randomize; for i=1 to 50 do begin a(i): =rondom(50)-20; write(a[i],'); end; for i: =1 to 50 do; begin if a [i]0 then k: =k+1; if a[i]then s : =s+a[i]; end; writeln(k=,k); writeln('s=',s); readln; end.
163
499
Ответы на вопрос:
Program cl; var a: array[1..50] of integer; i,k,s: integer; begin randomize; for i: =1 to 50 do begin a[i]: =random(50)-20; write(a[i],' '); end; writeln; for i: =1 to 50 do begin if a[i]> 0 then k: =k+1; if a[i]< 0 then s: =s+a[i]; end; writeln('k=',k); writeln('s=',s); readln; end.
Ясинтаксис этого старя уже не помню но в строке a(i): =rondom(50)-20; скорее всего должно быть a[i]: =rondom(50)-20;
import random
def numbers(s):
mas = [random.randint(1, 15) for i in range(s)]
print(mas)
print("{} елементов имеют максимальное значение".format(mas.count(max(
numbers(25)
Популярно: Информатика
-
тиматимуша24.07.2021 23:13
-
zaylera3413.05.2020 19:12
-
ЭлинаПринцесса5555513.06.2021 00:03
-
СофаСофачка28.10.2020 07:09
-
nastya0110201617.06.2020 01:26
-
ruslanbekka27.04.2022 13:03
-
vladplotnikov218.08.2020 13:38
-
Сашуньк25.01.2020 01:24
-
Valinka999925.11.2021 21:59
-
ZVer0071128.09.2022 10:16