Войти
Регистрация
Спроси ai-bota
В
Все
Б
Биология
Б
Беларуская мова
У
Українська мова
А
Алгебра
Р
Русский язык
О
ОБЖ
И
История
Ф
Физика
Қ
Қазақ тiлi
О
Окружающий мир
Э
Экономика
Н
Немецкий язык
Х
Химия
П
Право
П
Психология
Д
Другие предметы
Л
Литература
Г
География
Ф
Французский язык
М
Математика
М
Музыка
А
Английский язык
М
МХК
У
Українська література
И
Информатика
О
Обществознание
Г
Геометрия
Показать больше
Показать меньше
valkiriyali
10.09.2020 03:44 •
Информатика
Дано число если даное число нечотное то умножить на 2 если даное число больше 7-ми то вычислить квадратный корень
Показать ответ
Ответ:
ArseniiB1
06.10.2020 22:04
Паскаль:
var a:integer;begin ReadLn(a); if not (a mod 2 = 0) then WriteLn(a*2); if a > 7 then Writeln(Sqrt(a));end.
0,0
(0 оценок)
Популярные вопросы: Информатика
MashaBendyuk
22.02.2023 11:20
Предложить пользователю ввести координаты точки, определить входит ли точка с заданными пользователем координатами в заштрихованную область. Написать на Паскале!...
HeBce3HauKa
24.04.2021 06:41
Информатику знаю хорошо но не могу разобраться как сделать так чтоб спд 1 и 2 изменялось на ответ....
tayna73p00m0k
01.02.2021 07:50
начиная с 5 и по 10 1 вариант через 1час здавать...
nfedorova868
30.08.2022 12:35
Запиши развёрнутую запись числа 0,875 для дробной части числа....
nuraneferidxalideemi
21.05.2023 12:16
Составить программу в паскаль ,рассчитывающую периметр ромба...
Darjana13
05.02.2022 11:12
Задание на практическую работу Тема: Составление программ с командами цикла. Цель работы: Научиться составлять программы с циклическими командами. Порядок выполнения работы: 1. а)...
eshkeree1
01.05.2020 00:42
Напишите программу (python), которая соберет все подарки Иа от всех друзей. Формат ввода Целое число — количество строк, затем сами строки, в которых сначала вводится подарок, а...
fedushkinmax
29.07.2022 23:09
Придумать и заполнить в тетради таблицу «Грузовые перевозки», которая будет состоять из 5 строк и минимум 6 столбцов. Должна содержать хотя бы 3 формулы и 2 формулы (ЕСЛИ, СЧЁТЕСЛИ)...
Westix
29.10.2020 08:01
Даны натуральные числа n, a1 определить количество членов последовательности, являющихся нечетными числами...
досметова
22.03.2020 01:12
Существует ли треугольник, внешние углы которого равны 500, 1600, 1500? ...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
var a:integer;begin ReadLn(a); if not (a mod 2 = 0) then WriteLn(a*2); if a > 7 then Writeln(Sqrt(a));end.