А, б, г, е, з насчёт почты не очень уверен
Я использую Corel Draw. Много лет с ней работаю - очень удобно. Кто то работает на PAGE MAKER, кто то еще на чем то. Кто к чему привык.
Var g1, g2, g3: real;
begin
writeln('Введи три числа: ');
readln(g1, g2, g3);
if not ((g1 = 9.8) or (g2 = 9.8) or (g3 = 9.8)) then Writeln('Нет среди этих чисел ускорения на Земле') else begin
if g1 = 9.8 then Writeln('Первое - ускорение на Земле');
if g2 = 9.8 then Writeln('Второе - ускорение на Земле');
if g3 = 9.8 then Writeln('Третье - ускорение на Земле');
end;
<span>end.</span>
Чтобы перейти из десятичной системы счисления в восьмеричную, нужно выполнить деление столбиком на 8, а остатки, начиная с последнего, и будут являться ответом.
а) 51310 = 10018
513 | 1
64 | 0
8 | 0
1
б) 60010 = 11308
600 | 0
75 | 3
9 | 1
1
в) 201010 = 37328
2010 | 2
251 | 3
31 | 7
3