Ответ:
Объяснение:
Var
n,sum,n1,n2,n3:integer;
Begin
Write('Введите 3х значное число: ');
Readln(n);
n1:=n div 101;
n2:=(n div 10) mod 10;
if n2>n1 then writeln('2 число больше первого') else
writeln('1 число больше второго');
end.
Я написал на языке C++
#include <iostream>
using namespace std;
int main(){ unsigned int size; cin >> size; int* arr = new int[size]; int num_pos = 0; for (size_t i = 0; i < size; i++) { cin >> arr[i]; if (arr[i] > 0) { num_pos++; } }
cout << num_pos << endl; return 0;}
Program gt;
var f,ff:text;i,s,n:integer;
begin
assign(f,'input.txt');reset(f);
assign(f,'input.txt');rewrite(ff);
readln(f,n);
close(f);
s:=((1+n)*n)div 2;
writeln(ff,s);
close(ff);
<span>end.</span>
Нил-Египет, Амазонка-Южная Америка, Янцзы-Китай, Миссисипи-Северная Америка, Обь и Иртыш-Россия, Енисей и ангара-Россия, Хуанхэ-Китай, Амур и Шилка-Россия, Онон-Монголия, Лена-Россия, Конго-Центральная Африка.