1)а
var a:real;
begin
readln(a);
a1 := a*a; /получили а^2
a := a1*a1; /получили a^4
a := a1*a*a; /получили a^(4+4+2)
writeln(a);
end.
1б)
var x:real;
i:integer;
begin
readln(a);
a1 := a*a*a; /получили а^3
a := a1*a1*a1; /получили a^9
a := a*a1*a1; /получили а^(9+3+3)
writeln(a);
end.
2)
var a:real;
begin
readln(a);
writeln('высоты равны', a*a*sqrt(3)/4*a);
writeln('Радиус вписанной окружности', a*a*a/4*a*a*sqrt(3)/4);
writeln('Радиус описанной окружности', a*a*sqrt(3)/4*2/3*a);
end.
3)var a:real;
begin
readln(a);
writeln('В килобайтах' a/1024);
writeln('В мегабайтах' a/(1024*1024));
end.
'''
Длина Московской кольцевой автомобильной
дороги - 109 километров. Байкер Вася
стартует с нулевого километра МКАД
и едет со скоростью v километров в час.
На какой отметке он остановится
через t часов?
Программа получает на вход
значение v и t. Если v>0, то Вася
движется в положительном направлении
по МКАД, если же значение v<0, то
в отрицательном.
Программа должна вывести целое число
от 0 до 108 — номер отметки, на которой
остановится Вася.
'''
l = 109
v, t = [int(input(x)) for x in ('Скорость (км/с): ', 'Время (час): ')]
pos = v * t % l
print(pos)