Регистрация
Войти
Стать экспертом
Правила
Информатика
Исидор
5 год назад
Пожалуйста посчитайте с информатикой
ОТВЕТЫ
Десислава
Oct 24, 2020
см. приложение
var
x: real;
begin
Read(x);
if x <= 0 then
Write(0)
else if x <= 1 then
Write(x)
else
Write(x * x);
end.
620
Смежные вопросы:
Составьте программу ввода склавиатуртуры элементов массива a [1..10] и вывода
нужно ли заранее объявлять переменные процедуры и функции для их
На Как узнать сколько категорий разделяются типы данных. Перечислите и
Опишите принцип работы оператора IF. Приведите пример использования в программе.
Как узнать сколько символов содержит сообщение записанное с помощью 64
Контакты
Реклама на сайте
Спрошу
О проекте
Новым пользователям
Новым экспертам
x: real;
begin
Read(x);
if x <= 0 then
Write(0)
else if x <= 1 then
Write(x)
else
Write(x * x);
end.