Запиши верный ответ. (Используй символы &,¬,+,∨)

A∨E¯¯¯¯¯¯¯¯¯=

2 единицы т.к 1025=10000000001 в двоичной системе счисления

var a: integer;

begin

  read(a);

  if a mod 3 = 0 then writeln('делится')

  else writeln('не делится');

  readln;

end.

на чём писать? ну впрочем саму суть тут в условии:

объявляешь 3 числа: a b c

и условие

  if(a> 0)then

a: =a*a;

if(b> 0)then

b: =b*b;

if(c> 0)then

c: =c*c;

  выводишь на экран(или как там надо)

сори за ошибки давно на паскале не писал 

495+459=954 954-459=495