Предмет: Информатика,
автор: Fetru
Cоставьте программу которая формирует массив из пятнадцати случайных чисел от -20 до 20 и четные числа делит на два, а нечетные - умножает на 3. ( 9 класс).
Ответы
Автор ответа:
0
var
i : integer;
a: array [1..15] of integer;
begin
//заполним массив
for i:=1 to 15 do
begin
a[i]:=random(20)-10;
if (a[i] mod 2)=0 then
a[i]:=round(a[i]/2)
else
a[i]:=a[i]*3
end;
//распечатаем результат
for i:=1 to 15 do writeln (a[i]);
end.
Похожие вопросы
Предмет: Українська мова,
автор: oliavishniyk
Предмет: Геометрия,
автор: ekaterinaturiseva86
Предмет: ОБЖ,
автор: angel0070085
Предмет: История,
автор: travnickova2016
Предмет: Математика,
автор: totavo76