Question

Помогите умоляю!!! надо создать программы в паскале, чтобы решить три задачи.
1даны два действительных числа х и у.Вычислить их сумму, разность,произведение и частное.
2 Дана величина а, выражающая объем информации в байтах. Перевести а в более крупные единицы измерения информации.
ПОМОГИТе надо написать программы

Answer 1

var a, b : real;
begin
read(a,b);
write(a+b);
write(a-b);
write(a*b);
write(a/b);
end.



var a: real;
begin
read(a);
write( a/1000, 'mb');
end.
{mb значит мегабайт}