Помогите умоляю!!! надо создать программы в паскале, чтобы решить три задачи.
1даны два действительных числа х и у.Вычислить их сумму, разность,произведение и частное.
2 Дана величина а, выражающая объем информации в байтах. Перевести а в более крупные единицы измерения информации.
ПОМОГИТе надо написать программы
Ответы
Ответ дал:
5
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 значит мегабайт}
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 значит мегабайт}
mnv1962:
делить нужно не на 1000, а на 1024
Похожие вопросы
1 год назад
1 год назад
1 год назад
1 год назад
6 лет назад
8 лет назад
8 лет назад