profile
Опубликовано 4 года назад по предмету Информатика от Маричаа

Записать на языке Паскаль программу

  1. Ответ
    Ответ дан ff923
    program z;
    const n=30;
    var a:array[1..n] of integer; i,s:integer;
    begin
    s:=0;
    for i:=1 to n do
    begin
    a[i]:=random(50,200);
    s:=s+a[i];
    end;
    write(s);
    end.