Program dfgdf;
var
m,o,r,f:real;
begin
writeln('оценку по математике введите');
readln(m);
if (m>=1) and (m<=5) then
begin
writeln('оценку по русскому введите');
readln(r);
if (r>=1) and (r<=5) then
begin
writeln('оценку по физике введите');
readln(f);
if (f>=1) and (f<=5) then
begin
o:=(m+f+r+5)/4;
writeln('средняя оценка = ',o);
end
else
begin
writeln('не корректный ввод!!!');
end;
end
else
writeln('не корректный ввод!!!')
end
else
writeln('не корректный ввод!!!')
<span>end.</span>
№ 9 не знаю((((((((((((((((((((((((((((((((
16 бит = 2 байта
8*40*32*2 = 20480 байта занимает текст
16*3200 = 51200 байт
51200 + 20480 = 71680 байт
71680 / 1024 = 70 Кбайт
Ответ: 3
Не открывать подозрительные ссылки/сайты/файлы, возможно они заражены вирусами, но современные браузера оперативно отказывают в доступе сайта