Астестеройдес такого слова нету! вы наверно имеете ввиду астероид? то это - одна из малых планет, с диаметром 1тыс. км, пояс которых обращается вокруг солнца между орбитами марса и юпитера!
Var a,b,c,sred_A:real;
begin
Writeln('Привет,я-alconafft');
Writeln('Введи первое число');
readln(a);
Writeln('Введи второе число');
readln(b);
Writeln('Введи третье число');
readln(c);
sred_A:=a+b+c/3;
writeln('среднее арифметические равно ',sred_A);
end.
Программа на скрине! Надеюсь помог!
64 гб=68719.4765 мб, стандартный объем дискеты 1.44мб, значит 68719.4765/1.44= 47721 дискет