Массив из 5 целых вещественных чисел заполняет спомошью генератора случайных чис...

September 2021 1 5 Report

Массив из 5 целых вещественных чисел заполняет спомошью генератора случайных чисел диапазон -50 до 50 заменить все нули на число 25 вывести полученный массив на экран

Answers & Comments

Gleb1Kosyrev

Verified answer

//Pascal ABC.NET v3.1 сборка 1172

const
n = 5;

var
ar: array[1..n] of integer;
i: integer;

begin
randomize;
writeln('First array:');
for i := 1 to n do
begin
    ar[i] := random(-50, 50);
    write(ar[i]:4);
    if ar[i] = 0 then ar[i] := 25;
end;
writeln;
writeln('Final array:');
for i := 1 to n do
    write(ar[i]:4);
end.

Пример работы:

First array:
-6 -24   0 -15   7
Final array:
-6 -24 25 -15   7

0 votes Thanks 1

Answers & Comments

Verified answer

reshite pliz 53 7x5 x

pomogite reshit pliz sutochnoe postuplenie azota s produktami pitaniya dlya zhenshin

v kolebatelnom konture yomkost kondensatora 3 mkf a maksimalnoe napryazhenie na

reshite pliz log42x 1log43x 3

reshit uravnenie log2x25xlog23x8

reshit uravnenie log3x23xlog35x 8

pliz reshite zadachu po himii skolko molej fosfora soderzhitsya v volosah vzroslogo

3 ot etogo prihoditsya na kostnuyu tkan podschitajte skolko atomov magniya nahod

pliz pomogite reshit po himi chislo atomov kaliya v tele cheloveka sostavlyaet 221

s kakoj siloj i v kokom napravlenii elektricheskoe pole dolzhno dejstvovat na zar

рекомендуемые вопросы

Helpful Links

Helpful Social