Модеи: - 172 - м, 174 - о, 164 - д, 165 - е, 168 - и.
# дано число если оно положительное то вывести прямоугольник иначе квадрат
# Код на ruby 2.2.3p173
def zadanie(c)
if c > 0
p "priamougol`nik"
return
end
p "kvadrat"
end
# Примеры применения
zadanie(10)
zadanie(-10)
zadanie(0)
<u>PascalABC.NET 3.3.5, сборка 1659 от 09.04.2018</u>
<u>Внимание! Если программа не работает, обновите версию!</u>
begin
var x:=10;
var a:=(x+6)*Sqr(x)-Sqrt(x-1);
var b:=Abs(x-15)*Sqr(x+1)/242;
Writeln('a=',a,', b=',b,', a-b=',a-b)
end.
<u>Результат</u>
a=1597, b=2.5, a-b=1594.5