#include <iostream>
#include <cstdlib>
using namespace std;
int main()
{
int number; //Вводимое число
int difference_first, difference_second; //переменные проверки арифм. прогр.
cout << "Enter three digit number: "; cin >> number; //ввод трехзначного числа
while(number < 100 or number >= 1000){
//проверка числа на трехзначность
cout << "Error!\nEnter three digit number: "; cin >> number;
}
difference_first = number % 10 - (number / 10 % 10); //разница между третьей цифрой и второй
difference_second = (number / 10 % 10) - (number / 100 % 10); // разница между второй цифрой и первой
if(difference_first == difference_second){ // если эти разницы равны, значит
cout << "YES!" << endl; // вывод, ДА
}else cout << "NO!" << endl; // иначе, НЕТ
system("pause");
return 0;
type
intArr = array[1..10] of integer;
function isPrime(n: integer): boolean;
begin
result := False;
if n < 2 then exit;
var d := 2;
while (d <= n div 2) and (n mod d <> 0) do
d += 1;
result := d > n div 2
end;
var
a, b: intArr;
Print('A:');
for var i := 1 to 10 do
a[i] := i;
Print(a[i])
Write(NewLine, 'B: ');
var j := 0;
if isPrime(a[i]) then
j += 1;
b[j] := a[i];
Print(b[j])
end
end.
#include <iostream>
#include <cstdlib>
using namespace std;
int main()
{
int number; //Вводимое число
int difference_first, difference_second; //переменные проверки арифм. прогр.
cout << "Enter three digit number: "; cin >> number; //ввод трехзначного числа
while(number < 100 or number >= 1000){
//проверка числа на трехзначность
cout << "Error!\nEnter three digit number: "; cin >> number;
}
difference_first = number % 10 - (number / 10 % 10); //разница между третьей цифрой и второй
difference_second = (number / 10 % 10) - (number / 100 % 10); // разница между второй цифрой и первой
if(difference_first == difference_second){ // если эти разницы равны, значит
cout << "YES!" << endl; // вывод, ДА
}else cout << "NO!" << endl; // иначе, НЕТ
system("pause");
return 0;
}
type
intArr = array[1..10] of integer;
function isPrime(n: integer): boolean;
begin
result := False;
if n < 2 then exit;
var d := 2;
while (d <= n div 2) and (n mod d <> 0) do
d += 1;
result := d > n div 2
end;
var
a, b: intArr;
begin
Print('A:');
for var i := 1 to 10 do
begin
a[i] := i;
Print(a[i])
end;
Write(NewLine, 'B: ');
var j := 0;
for var i := 1 to 10 do
begin
if isPrime(a[i]) then
begin
j += 1;
b[j] := a[i];
Print(b[j])
end
end
end.