Var y,x,i,a,b,c,r,m,n,v: integer; begin for a: = 2 to 7 do if (a=2)or(a=3)or(a=5)or(a=7) then for b: = 2 to 7 do begin if (b=2)or(b=3)or(b=5)or(b=7) then for c: = 2 to 7 do if (c=2)or(c=3)or(c=5)or(c=7) then begin x: =a*10+b; y: =b*10+c ; r: =a+b+c; m: =2; while x mod m< > 0 do m: =m+1; if m=> x-1 then begin n: =2; while y mod n< > 0 do n: =n+1; if n> =y-1 then begin v: =2; while r mod v< > 0 do v: =v+1; writeln(a*100+b*10+c); end; end; end; end; end.

трехзначное число называется суперпростым если его цифры, сумма цифр, двухзначные числа из первой и второй, второй и третьей цифр - простые числа. но, цифра 1 - не простое число. сколько всего таких чисел и что это за числа. составьте программу решения

#include <iostream>
using namespace std;
int main()
{
cout <<"4,4"<<endl;cout <<"4,5"<<endl;cout <<"4,6"<<endl;cout <<"4,7"<<endl;cout <<"4,8"<<endl;cout <<"4,9"<<endl;cout <<"5,0"<<endl;cout <<"5,1"<<endl;cout <<"5,2"<<endl;cout <<"5,3"<<endl;cout <<"5,4"<<endl;cout <<"5,5"<<endl;cout <<"5,6"<<endl;cout <<"5,7"<<endl;cout <<"5,8"<<endl;cout <<"5,9"<<endl;cout <<"6,0"<<endl;cout <<"6,1"<<endl;cout <<"6,2"<<endl;cout <<"6,3"<<endl;cout <<"6,4"<<endl;
}

С развитием компьютерной техники появился новый уникальный метод исследования -компьютерный эксперимент.
Эксперименты проводят при испытании новых образцов продукции на предприятиях. Обычно для этого используется специально создаваемая установка, позволяющая провести эксперимент в лабораторных условиях, либо сам реальный продукт подвергается всякого рода испытаниям (натурный эксперимент). Для исследования, к примеру, эксплуатационных свойств какого-либо агрегата или узла его помещают в термостат, замораживают в специальных камерах, испытывают на вибростендах, роняют и т. п. Хорошо, если это новые часы или пылесос — не велика потеря при разрушении