Объем памяти дискета до 2,88мб
Program n1;
var a: integer;
begin
readln(a);
if (a mod 10)+(a div 100)+(a mod 100 div 10)>10 then write('верно') else write('неверно');
end.
00001,00010,00100,01000,10000.
37162485
17362485
18362475
18365472
12365478
12345678
Ответ:
#include <iostream>
using namespace std;
int main() {
for(short i = 10; i < 100; i++) {
for(short j = 10; j < 100; j++) {
if((i * i + j * j) % 13 == 0)
cout << i << " " << j << endl;
}
}
}