Дневник,телефон,книга (газета),компьютер
Program n1;
var sum,a: integer;
begin
readln(a);
sum:=0;
while a<>0 do
begin
if (a mod 3=0) and (a mod 10=7) then sum:=sum+a;
readln(a);
end;
write(sum);
end.
Тачпад встроен он удобнее но если он сломается его просто так не купишь
надо комп в ремонт нести и ждать долго плюс это дорого.
Мышка попроще но не удобна в перевозке но если она сломается то её спокойно можно купить в магазине.
Y:=sqr((sqrt(sqr(x))+2*b)/(a+sqr(b)+c));