Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
германия
испания
португалия
франция
чехия
var s,r: real;
begin
read(r);
s: =pi*sqr(r);
writeln(s: 0: 4);
end.
1)через сеть интернет либо съемные носители 2)размножался в системе, выполнял нагрузку на цп до 100% 3)удалил с антивирусной программы 4)нужно ставить защиту на браузер и перед работы со съемным носителем проверять его на вирусы
var a: integer;
read(a);
if a mod 3 = 0 then writeln('делится')
else writeln('не делится');
readln;
Популярные вопросы