Алгоритм с заданным условием проверки и переменной n (n:= - команда присвоения значения переменной)
Program p1;
var a:array[1..10] of integer;
i:integer;
begin
randomize;
for i:=1 to 10 do a[i]:=random(10);
writeln('Массив:');
for i:=1 to 10 do writeln('a[',i,']=',a[i]);
for i:=1 to 10 do a[i]:=a[i]+i;
writeln('Результат:');
for i:=1 to 10 do writeln('a[',i,']=',a[i]);
end.
За покупку от 2000 и больше покупатель получает бесплатную доставку
Поставить антивирус, платный/бесплатный, не скачивать всякие ресурсы с неизвестных источников, не заходить на неизвестные сайты и т.д
A)кузнец,столяр,швея,шахтёр.b)таксист,слесарь,ткачиха