Предмет: Информатика, автор: YoelZelten

Заполнить массив из 10 элементов случайными числами в интервале [-10..10]. Заполните массив B[10], полученный из массива А путем умножения отрицательных его элементов на 2, а положительных на 3. Выведите массив A и B

Ответы

Автор ответа: Gluk1
0

uses crt;
var i:integer;
a:array[1..10] of integer;
b:array[1..10] of integer;
begin
randomize;
for i:=1 to 10 do a[i]:=random(21)-10;
for i:=1 to 10 do write(a[i],' ');
for i:=1 to 10 do
begin
if a[i]<0 then b[i]:=2*a[i]
else b[i]:=3*a[i];
end;
writeln;
for i:=1 to 10 do write(b[i],' ');
readln;
end.

Автор ответа: Alphaeus
0

Program YoelZelten;
const n=10;
var
  ma: array[1..n] of real;
  mb: array[1..n] of real;
  i: integer;
begin
  randomize;
  writeln('*************************************');
  writeln('***   Массив А   **    Массив В   ***');
  for i:=1 to 10 do
    begin
      ma[i]:=random(21)-10;
      if ma[i]<0 then mb[i] := ma[i] * 2
        else mb[i] := ma[i] * 3;
      writeln('***',ma[i]:8:0,'      **   ',mb[i]:8:0,'    ***');
    end;
  writeln('*************************************');
end.

Похожие вопросы
Предмет: Қазақ тiлi, автор: aishuaksadykova

1.Біріңғай еріндік дауыстылардан тұрған сөзді тап
А) бару, қайту
В) кассир, эквадор
С) кету, ояну
D) торсық, жабдық
Е) тұру, жүру
2.Екі буынды сөзді тап
А) қант
В) еш
С) тарс
D) серт
Е) салық
3.Кейінді ықпалды белгіле
А) келе көр
В) Жанпейіс
С) ішсе
D) ала көз
Е) Ащса
4.Бірыңғай жуан буынды сөзді тап
А) тану
В) арбакеш
С) сөзшең
D) Қасен
Е) өсу
5.Тасымалдауға келмейтін сөзді ажырат
А) достық
В) қазына
С) өнер
D) дәстүр
Е) шыншыл
6.Орфоэпиялық заңдылыққа сәйкес жазылған сөзді тап
А) көз бояу
В) атты кісі
С) есікті ашшы
D) құшша ұшу
Е) жазушы
7.Жуан, жіңішке дауысты дыбыстардың жасалуын анықта
А) тілдің қатысына қарай
В) езудің қатысына қарай
С) еріннің қатысына қарай
D) салдырдың қатысына қарай
Е) жақтың қатысына қарай
8.Ашық буынды сөзді тап
А) шалқар
В) дара
С) кең
D) тар
Е) жұмбақ
9.Орфографиялық ережеге сай жазылмаған сан есім
А) біреу
В) алтыау
С) бесеу
D) жетеу
Е) екеу
10.Кейінді ықпалды сөзді тап
А) елге
В) төнбеді
С) Есбай
D) ашса
Е) оқулық
11.Жіңішке дауыстылардан жасалған сөз
А) әлдеқайда
В) қауіп-қатер
С) мәжіліс
D) Күләнда
Е) басқарма
12.Тасымалдауға болмайтын сөз
А) тұйық
В) туған
С) жаздық
D) етіс
Е) қағаз
13.Сөз ішіндегі кейінді ықпалды сөзді тап
А) Айлалы батыр алдырмас.
В) Мұхтар Әуезов шығармаларының толық жинағы қайта шықты.
С) Сараңдық пен арамдық ағайындас.
D) Көңілсізден күлкі шықпас.
Е) Терең құдықтың суы тәтті.
14.Ашық, жуан, еріндік дауыстыны тап
А) а
В) о
С) е
D) ы
Е) ө
15.Тек ашық буынды сөзді тап
А) әкімшілік
В) тамаша
С) ғажап
D) жалгер
Е) жақсы
16.Қай сөзде кейінді ықпал байқалатынын тап
А) жазғы
В) естен
С) класқа
D) әркім
Е) сызығы
17.Жақтың қатысына қарай дауысты дыбыстар нешеге бөлінетінін көрсет
А) 5
В) 2
С) 4
D) 3
Е) 1
18. Жуан буынды сөздер қатарын көрсет
А) балдырған, орталық
В) кемпірқосақ, тату-тәтті
С) әлдебір, алтыбақан
D) беташар, атқа мінер
Е) инелік, мүйізтұмсық
19.Сөз ішіндегі кейінді ықпалды тап
А) Жастығым – отшағым.
В) Бала – бауыр ет.
С) Ел ертеңі жарқын.
D) Ғалым ауыр ойлар.
Е) Жаманның жаны тәтті.
20. Тек орыс тілінен енген сөздерде ғана қолданылатын таңба
А) ь
В) е
С) щ
D) к
Е)ә
21.Тұйық буынды сөздер қатарын тап
А) он бір
В) өз-өзі
С) озбыр
D) ол, өрт
Е) өкпе-наз
22.Бірыңғай жуан дауысты дыбыстан тұрған сөзді көрсет
А) Нілжан
В) Қанат
С) Орден
D) Бөдене
Е) Ербол
23.Буын түрлерінің саны
А) 3
В) 2
С) 1
D) 4
Е) 5
24.Ілгерінді ықпалды көрсет
А) балаша
В) қашса
С) сөзсіз
D) қайғы
Е) үйшік
25.Қазақ тіліне тән дыбыстарының санын анықта
А) 5
В) 6
С) 9
D) 8
Е) 7

Предмет: Алгебра, автор: ynga