Вообще это почта(5букв)
может не 10,а 5?????
<span>Первая:
</span>
var
x,y,z:real;
begin
readln(x);
y:=x+2.3;
z:=y/1.2;
writeln(x+y+z);
end.
<span>Вторая:
vara,b:real;beginreadln(a);readln(b);writeln('Периметр: ', 2*(a+b));writeln('Площадь: ', a*b);end.
Третья:
varv1,v2,s,t:real;beginreadln(v1);readln(v2);readln(s);readln(t);writeln((v1*t)+(v2*t)+s)end.</span>
Тетрадь какого автора? Уточните задание.
<em>uses crt;(если используешь абс паскаль) </em>
<em>var n,b,k:integer;</em>
<em>begin</em>
<em>writeln ('n'); </em>
<em>readln (n);
k:=n mod 2;
</em><em>b:=n mod 10;</em>
<em>if k = 0 then writeln (b);</em>
<em>end.</em>
Правильный ответ 7
div - целочисленное деление, 36 / 5 = 7 и 1 в остатке