Составить программу которая заполняет массив из 10 элементов ...

Question

Составить программу которая заполняет массив из 10 элементов ...

Motes

Составить программу которая заполняет массив из 10 элементов случайными целыми числами из положительные, отрицательные и нулевые числа и выводит на экран.

Есть ответ

17.12.2022

295

Ответ

Answer 1 · 17.12.2022

var a:array [1..10] of integer;b,i:integer;z:real;beginrandomize;for i:=1 to 10 dobeginz:=random;b:=random(10);if z>0.5 then a[i]:=belse a[i]:=-b;end;for i:=1 to 10 dowrite(' ',a[i]);end.

если что то не понятно,спрашивай)

Составить программу которая заполняет массив из 10 элементов ...

Составить программу которая заполняет массив из 10 элементов случайными целыми числами из положительные, отрицательные и нулевые числа и выводит на экран.

Ответ

var a:array [1..10] of integer;b,i:integer;z:real;beginrandomize;for i:=1 to 10 dobeginz:=random;b:=random(10);if z>0.5 then a[i]:=belse a[i]:=-b;end;for i:=1 to 10 dowrite(' ',a[i]);end. если что то не понятно,спрашивай)

var a:array [1..10] of integer;b,i:integer;z:real;beginrandomize;for i:=1 to 10 dobeginz:=random;b:=random(10);if z>0.5 then a[i]:=belse a[i]:=-b;end;for i:=1 to 10 dowrite(' ',a[i]);end.

если что то не понятно,спрашивай)