Войти
Регистрация
Спроси ai-bota
В
Все
Б
Биология
Б
Беларуская мова
У
Українська мова
А
Алгебра
Р
Русский язык
О
ОБЖ
И
История
Ф
Физика
Қ
Қазақ тiлi
О
Окружающий мир
Э
Экономика
Н
Немецкий язык
Х
Химия
П
Право
П
Психология
Д
Другие предметы
Л
Литература
Г
География
Ф
Французский язык
М
Математика
М
Музыка
А
Английский язык
М
МХК
У
Українська література
И
Информатика
О
Обществознание
Г
Геометрия
Показать больше
Показать меньше
метрон
15.05.2020 10:13 •
Информатика
Составьте блок-схему и напишите программу вычисления квадрата числа a, если a< 5 или a+8 в противном случае. значение aзадайте с клавиатуры.
Показать ответ
Ответ:
34we523
27.06.2020 12:56
Var a: integer;
begin
read(a);
if a<5 then write(a*a)
else write(a+8);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
vladivanko400
16.10.2021 20:52
Знаю примерно как решать ,но не выводится на программе паскаль(1.увеличить переменную f 6 раз,если f нечётное число,иначе увеличить на 29.2.факториал числа...
nazarm378
16.10.2021 20:52
Составьте блок схему и программу для нахождения минимального из 2 х чисел введенных с клавиатуры...
Kravtskris
22.01.2023 22:42
3. Название инструмента редактирования. A) Рулетка.B) Панорама.C) Палитра.D) Тастик.E) Окно увеличения. скорее ...
АндрейПермь123
02.12.2020 05:17
Идентифицировать. Робот бесконечендвигаться впереддаетРоботойотраженныйсветаяркостьМенее 50до того какдвижется вперед.Роботобъект 50SMНа расстоянииприближающийсяждуимеет место срочьно...
Ha4uk
24.06.2021 22:35
1. возведи в квадрат 2. прибавь b первая из них возводит число на экране во вторую степень, вторая прибавляет к числу b. известно что программа 12222 переводит число 6 в число 52...
Kros228volk225
10.12.2021 06:16
Ниже приведена таблица базы данных: Определите ОДНО имя поля базы данных 1. Определите количество записей в базе данных...
zdacieva07
02.11.2021 09:52
Вычислить площадь криволинейной трапеции, ограниченной y=0, x=a, x=b, y=ln(x*x+1)+sin(x*x)...
yuralavrenov2016
14.11.2021 06:38
На множестве вещественных чисел R найти множества истинности предикатов P- Q = -P\/Q; Q- P = -Q\/P; P Q = P/\Q\/(-P)/\(-Q). Где...
sveta17032001
02.05.2020 15:21
подпишусь, сднлаю лучший ответ...
Johhn1
02.11.2021 14:02
Кто не даст правильный ответ в бан!...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
begin
read(a);
if a<5 then write(a*a)
else write(a+8);
end.