Информатика (19 баллов)

Информатика (19 баллов)

Задать свой вопрос
Виктор Прыгачев
Язык какой?
1 ответ
// PascalABC.NET 3.3, сборка 1573 от 04.11.2017

// Внимание! Если программа не работает, обновите версию!

1)

begin
var x:=ReadReal('X =');
Writeln('Y = ', xgt;=0 ? 7*x - 3:2*x*x*x);
end.

2)

begin
var a:=ReadReal('Итог первого соучастника равен');
var b:=ReadReal('Итог второго соучастника равен');
var c:=ReadReal('Итог третьего соучастника равен');
Writeln('Наихороший итог: ', min(min(a,b), c));
end.

3)

begin
var b:= ReadReal('b =');
Writeln(b gt; 3? b-5:b*2);
end.
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт