Uses crt;
var i,n,p,k:integer;
begin
clrscr;
readln(n);
for i:=2 to n div 2 do
if (n mod i = 0) then inc(k);
if k =0 then writeln('simple')
else writeln('not simple');
readln
end.
Чем отличается сохранить и сохранить как? ну если по логически подумать сохранить, сохраняет в том формате в котором работал, а сохранить как уже выбераешь сам как сохранить и в каком формате.
| = ИЛИ
& = И. Т.е (сомики И меченосцы) ИЛИ гуппи
получается если сомики И меченосцы - 100 запросов,
гуппи 500
100+500=600
Ответ 600 запросов
Попробуй правой стороной мыши на объект, потом свойства и всё