Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
program mss; uses crt; var v,m,h,r: real; beginclrscr; writeln('введите радиус'); readln(r); writeln('введите высоту'); readln(h); v: = 3.14*sqr(r)*h; m: = 1200*v; writeln(' ',m: 2: 2,' кг'); readln; end.
решение для 4-байтного представления
запишем двоичное число в форме нормализованного двоичного числа с плавающей точкой
0,110010001*10^1000
10- основание (2дес=10дв)
1000-порядок(8дес=1000дв)
определим машинный порядок:
мп = 1000 + 1000000 = 1001000
запишем число
01001000 0000000 00000001 10010001
порядок ман тис са
плата вроде как, если не ошибаюсь
попробуйте так (turbo pascal):
program 1;
var s: string;
c: integer;
begin
write('vvedite nazvaniye zhivotnogo');
read(s);
writeln('vvedite kolichestvo syedennyh gribov');
readln(c);
writeln(s, ' ', 'syest', ' ', c, ' ', 'gribov');
end.
Популярные вопросы