1) 1200+ 990+25000+4500=31690
ответ: 31690
Раз в обоих заданиях известно количество элементов в массиве, то имеет смысл использовать цикл for.
Задание №1
const n=20;
var
a:array[1..n] of integer;
i,s:integer;
begin
s:=0;
for i:=1 to n do begin
a[i]:=random(1001);
if a[i] mod 10 = 4 then s:=s+1;
end;
writeln(s);
end.
<span>Задание №2
const n=20;
var
a:array[1..n] of integer;
i,max,nmax:integer;
begin
max:=0;
for i:=1 to n do begin
a[i]:=random(1001);
if a[i] >max then begin
nmax:=i;
max:=a[i];
end;
write(a[i]:5);
end;
writeln;
writeln(nmax,' ',a[nmax]);
end.
</span>
3)интернет,1)информация,2)итекет,5)плагиат,
Вы уже задолбали, пишите на каком языке. Напишу на c++.
import <iostream>
using namespace std;
int main(){
int a;
int b;
cin>>a;
cin>>b;
if(a<0){
cout<<a*a;
}
if(b<0){
cout<<b*b;
}
return 1;
}