Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
я бы сделал
program p_1; var a,b: real; beginwriteln ('vvedite 1-oe'); read (a); writeln ('vvedite 2-oe'); read (b); if (a> b) thenbegin writeln ( ' 1-oe bolshe (',a,')' ); end; if (a< b) thenbegin writeln ( ' 1-oe menshee. bolshe vtoroe (',b,')' ); end; if a=b thenbegin writeln ('oni ravni'); end; end.
в одном байте восемь бит. следовательно 100/8=12.5
ответ 12.5
var
a,b,c: real;
begin
readln(a,b,c);
writeln((a+b+c)/3);
end.
в одном часе 3600 секунд. за час произойдёт 3600*10^6 операций.
чтобы выполнить их на арифмометре (не завидую тому, кто решится так делать), потребуется
3600*10^6*10 секунд = 10^7 часов или примерно 1141 год
Популярные вопросы