// pascalabc.net 3.2, сборка 1399 от 08.03.2017 // внимание! если программа не работает, обновите версию! begin var x: =readreal('x='); writeln('s=',range(1,7).select(i-> sin(power(x,) end. пример x= 2.17 s=-2.20745116250773
Спасибо
Ответ дал: Гость
uses crt; var a,b,c,min: integer; beginwriteln('введи три числа: '); readln(a,b,c); min: =a; if b< min then min: =b; if c< min then min: =c; writeln('наименьшее из этих чисел: ',min); readln; end.
Ответ дал: Гость
первую фигуру мы можем раскрасить в 6 цветов, вторую - в 5, третью- в 4, и т.д. а первую - в 3 цвета
Популярные вопросы