Begin
var k := 24.0;
var m := k / 3;
k := m / 4 + 2;
m := m + 2 * k;
Println(k, m);
end.
Ответ 4 16
begin
var x := 23;
var y := 12;
y := 3 * x - 4 * y;
var z := 0.0;
if x > y then
z := 3 * x + y
else z := 2 + x * y;
Println(z);
end.
Ответ 90
Листы размером А4 получаются разрубанием пополам листов размером А3
2 * 42 = 124 или 42 + 42 =124 (с/с -?)
42 (в 6 с/с) = 4*6+2=26 (в 10с/с) 26+26=52(в 10с/с) 52 (10с/с)= 124 (в 6с/с)
Ответ: 6 с/с
Program zz;
var i,n,m:integer;
begin
readln(n,m);
for i:=1 to n do
write('?') ;
for i:=1 to m do
write('!') ;
end.<span>
</span>
Кол-во операций: 4
<span>Можно ведь, чтобы сократить число операций, деление заменить на десятичные дроби, типо 5/2= 2,5 ; 3/4 = 0,75 ; 7/10 = 0.7</span>