Данн одномерный массив из N элементов заполнить его случайными числами от -20 до...

November 2021 1 9 Report

Данн одномерный массив из N элементов заполнить его случайными числами от -20 до 25 все положительными элементами заменить на 1. все отрецательные на 0

Answers & Comments

preceptor Program Task;
Const N = 10;
Var a: Array [1..N] of Integer;
i: Integer;
Begin
Randomize;
For i := 1 To N Do
a[i] := Random(25 + 20 + 1) - 20;
WriteLn('Результат №1: ');
For i := 1 To N Do
Write(a[i], ' ');
WriteLn;
For i := 1 To N Do
If a[i] > 0 Then
a[i] := 1
Else If
a[i] < 0 Then
a[i] := 0;
WriteLn('Результат №2:');
For i := 1 To N Do
Write(a[i], ' ');
ReadLn;
End.

1 votes Thanks 1

napishite uravneniya reakcij pri pomoshi kotoryh mozhno osushestvit sleduyushie prevra0dd2d580886fa1d0061eaf9c6411237b 39137

Answer

Alika3 July 2022 | 0 Ответы

Answers & Comments

vychislite obyom nu hlora kotoryj potrebuetsya dlya vytesneniya vsego ioda iz 59c900783b29d4b775812cd3feccb6248 9550

kakie meropriyatiya mogut provoditsya v zone kontrterroristicheskoj operacii s uchyot

kakie osnovnye principy i celi uchityvayutsya v rossii pri organizacii borby s ter

protivopozharnaya profilaktika

napishite uravneniya reakcij pri pomoshi kotoryh mozhno osushestvit sleduyushie prevra0dd2d580886fa1d0061eaf9c6411237b 39137

v kazhdoj pyatoj banke kofe soglasno usloviyam akcii est priz prizy raspredelenyce82aa2888409fe60f7d4ad87d1e59de 65845

120drob 036

2)...

sostavte uravnenie reakcij v sootvetstvii so shemoj prevrashenij nacl hcl cl2 m

s kakoj celyu v nashej strane bylo sozdano ministerstvo po delam grazhdanskoj obo

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

Helpful Links

Helpful Social