1)
var i, S, N: integer;
begin
writeln('Введите N:');
readln(N);
repeat
if i mod 2=0 then S:=S+i;;
inc(i)
until i>n;
writeln('Сумма всех четных чисел 1 до ',N,' равна: ',S);
readln;
End.
2)
var i, S, N: integer;
begin
writeln('Введите N:');
readln(N);
while i<=N do
begin
if i mod 2=0 then S:=S+i;
i:=i+1;
end;
writeln('Сумма всех четных чисел 1 до ',N,' равна: ',S);
end.
3)
var i, S, N: integer;
begin
writeln('Введите N:');
readln(N);
for i:=1 to N do
if i mod 2=0 then S:=S+i;
writeln('Сумма всех четных чисел 1 до ',N,' равна: ',S);
end.
#include <iostream>
#include <vector>
using namespace std;
#define ll long long
#define ld long double
signed main(){
ll n,m;
cin >> n >> m;
vector<pair<ll,ll>> v;
ll cur_min = LLONG_MAX;
for(ll i = 0; i < n; i++)
for(ll j = 0; j < m; j++){
ll x;
cin >> x;
if(x < cur_min){
v.clear();
v.push_back({i,j});
cur_min = x;
}
else if(x == cur_min)
v.push_back({i,j});
}
for(auto i: v)
cout << i.first << " " << i.second << "\n";
}