Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
program xxx;
var a, b, s : real;
r, p, d : real;
begin
write ('введите певрое число- ');
readln (a);
write ('введите второе число- ');
readln (b);
s: = a+ b;
r : = a - b;
p : = a* b;
d : = a/b;
writeln ('сумма =', s);
writeln ('разность =', r);
writeln ('произведение =', p);
writeln ('частное = ', d);
readln
end.
имя возраст занятие
оля 13 пение
петя 14 баскетбол
вася 13 хоккей
катя 15 танцы
коля 11 баскетбол
серёжа 11 футбол
64000 бит/с*16 c=1024000 бита/8=128000 байт=125 килобайт
5`120`000 бит = 640 000 байт = 625 кб
Популярные вопросы