Зрительная, так как только её нельзя написать..
Найдем вес 1 символа (i). Он выбирается из 25 букв и 10 цифр, т.е. N=25+10=35
N= 2^i,
35=2^i, отсюда i=6 бит
1 номер состоит из 7 символов, вес 1 номера=7*6=42 бита=6 минимально возможных байт.
80 номеров=80*6=480 байт
Var
a, f, t, S: real;
begin
Write('Введите длину стороны ромба: '); Readln(a);
Write('Введите величину острого угла ромба в градусах: '); Readln(f);
t := f * pi / 180;
S := sqr(a) * sin(t);
Writeln('Площадь ромба равна ', S, ' кв.ед.')
end.
Тестовое решение:
Введите длину стороны ромба: 14.3
Введите величину острого угла ромба в градусах: 58.7
Площадь ромба равна 174.728286173858 кв.ед.