Массивы. Паскаль
проверьте пожалуйта задачу.
В линейном массиве целлых чисел b
заменить все элементы кратные 5, на их удвоенное значение.
program zadacha
var B: array [1..30] of integer;
i, n of integer;
begin
writeln ('ввод колличество элементов массива');
readln
;
for: i:=1 to n do
readln (a );
for: i:=1 to n do
if a mod 5 <>0 then
a :=a *2;
for: i:=1 to n do
writeln ( 'a =');
end.
я не понимаю как сделать вывод и думаю, что должна вводить еще обозначения кроме I и n
проверьте пожалуйта задачу.
В линейном массиве целлых чисел b
program zadacha
var B: array [1..30] of integer;
i, n of integer;
begin
writeln ('ввод колличество элементов массива');
readln
for: i:=1 to n do
readln (a );
for: i:=1 to n do
if a mod 5 <>0 then
a :=a *2;
for: i:=1 to n do
writeln ( 'a =');
end.
я не понимаю как сделать вывод и думаю, что должна вводить еще обозначения кроме I и n