Помогите плиз. дан массив. Все его элементы умножить на последний элемент.решить при помощи паскаль.
var
a:array[1..10] of integer;
i,b:integer;
begin
randomize;
for i:=1 to 10 do
read(a[i]);
b:=a[i]*a[10];
write(b);
end.
Copyright © 2024 SCHOLAR.TIPS - All rights reserved.
Answers & Comments
var
a:array[1..10] of integer;
i,b:integer;
begin
randomize;
for i:=1 to 10 do
read(a[i]);
for i:=1 to 10 do
b:=a[i]*a[10];
write(b);
end.