Предмет: Информатика,
автор: egor080885
Преобразовать массив увеличив каждый элемент в 2 раза, вывести на экран исходный и преобразованный. Помогите пожалуйста
Ответы
Автор ответа:
1
var a:array [1..12] of integer;
i:integer;
begin
for i:=1 to 12 do a[i]:=random(6)+1;
writeln('Исходный массив: ',a);
for i:=1 to 12 do a[i]:=a[i]*2;
writeln('Преобразованный массив: ',a)
end.
egor080885:
огромное спасибо
Похожие вопросы
Предмет: Математика,
автор: lilia4841
Предмет: Химия,
автор: jekdjtndhdhrj
Предмет: Биология,
автор: sonalapa2511
Предмет: Математика,
автор: кирилл19992
Предмет: Алгебра,
автор: narinegevorgya