Войти
Регистрация
Спроси ai-bota
В
Все
У
Українська література
Г
Геометрия
Д
Другие предметы
Э
Экономика
Г
География
О
ОБЖ
М
Математика
М
МХК
Х
Химия
Қ
Қазақ тiлi
Л
Литература
У
Українська мова
О
Обществознание
Ф
Физика
А
Английский язык
А
Алгебра
И
История
Б
Беларуская мова
Б
Биология
М
Музыка
П
Право
И
Информатика
П
Психология
В
Видео-ответы
Н
Немецкий язык
Ф
Французский язык
О
Окружающий мир
Р
Русский язык
Показать больше
Показать меньше
diken1
11.07.2022 20:31 •
Информатика
Скажите, где тут ошибка? f= {2,если х > 5 f={x,если х ≤ 5 program var x, f: real; red ln (x) if: x > 5 then f: =2 elsef: =x, write ln (f); end
Ответ:
MrFear41
25.05.2020 14:22
program prog;
var
x, f: Real;
begin
readln (x);
if(x > 5) then f := 2
else f := x;
writeln (f);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
mooziviycom
06.03.2023 07:22
Var mas : array [1 .. 10] of integer; i : integer; function f(n: integer): integer; begin f: =n xor 5; end; begin for i: =1 to 10 do read(mas[i]); for i: =1 to 10 do mas[i]: =f(mas[i]);...
KatinaDobet2006
10.01.2022 01:28
Как число 100 хранится в компьютере...
ANNAAFANASYEVA1
10.01.2022 01:28
Объём диска 600 мб сколько рисунков объемом 300кб можно разместить на этом диске...
Siyara1
10.01.2022 01:28
Каким образом можно узнать свойства объекта или выполнить действие с ним...
10д
20.04.2020 11:24
Свободное и открытое по это одно и тоже или нет? их различия и сходства....
0502abylai
08.09.2021 12:28
Начертите отрезок АВ длиной 6 см. Начертите окружность радиусом 3 см с центром в точке А и окружность радиусом 3 см - с центром в точке В....
Fast2791
08.09.2021 12:28
Какую из этих медалей вручили жители деревни Уткино лучшему фермеру, если известно, что периметр этой медали равен 12 см?...
Диляра20082107
08.09.2021 12:28
Решите уравнения с проверкой и объяснением. х : 5 = 15 у • 2 = 90 с - 34 = 52...
kuryaevm
08.09.2021 12:28
Решите уравнения с объяснением и проверкой. 96 :х = 32 у + 33 = 91 65 - с = 55...
Ainur0529
08.09.2021 12:28
Объясните, как Денис выполнил деление 60:15. Денис рассуждал так: деление и умножение - это взаимно обратные действия. Значит, можно подобрать...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
program prog;
var
x, f: Real;
begin
readln (x);
if(x > 5) then f := 2
else f := x;
writeln (f);
end.