Войти
Регистрация
Спроси ai-bota
В
Все
Х
Химия
В
Видео-ответы
А
Алгебра
Г
Геометрия
О
ОБЖ
Д
Другие предметы
У
Українська література
Р
Русский язык
Б
Беларуская мова
У
Українська мова
Э
Экономика
Ф
Физика
М
Математика
Ф
Французский язык
Г
География
И
Информатика
М
МХК
О
Окружающий мир
П
Психология
Н
Немецкий язык
О
Обществознание
П
Право
И
История
М
Музыка
Л
Литература
Қ
Қазақ тiлi
Б
Биология
А
Английский язык
Показать больше
Показать меньше
раовт
15.04.2023 07:08 •
Информатика
Составьте программу на паскале для вычисления n+5 для нечётного целого числа n и n^2 для чётного n.
Ответ:
Marsel2V
09.10.2020 00:20
var n:integer;
begin
readln(n);
if n mod 2 = 0 then
writeln(n*n)
else writeln(n+5);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
Анастасия02052005
06.07.2022 07:03
Добрый день. как в паскале чертежник написать программу, чтобы нарисовать цифры 1,2,3,4,5...
maxim210204
23.05.2023 11:13
Ориентация элементов, составляющих материю. первые пять букв этого слова образуют отдельное слово, которое обозначает группа слов на каком-либо носителе...
saksharovsasha
23.05.2023 11:13
Прочитайте из файла f1 все числа найдите их произведение результат выведите в файл f2...
Ови11
12.05.2022 20:54
Напишите программу, переводящую оценку из 100- системы в пятибалльную. НА PYTHON...
polonnikovdanil
24.11.2022 04:29
Practice 1. Let s make simple calculations using Python: 478+1036, 5369-1473, 15. 583, 145:27, 12,55 • 2,45 2. Calculate the following problems using Python: Dias has 500...
yana1028
12.06.2022 20:19
1)записать число в развернутой форме 234в(10) 2) 1111100в(2)...
тупоесозжание
14.09.2020 19:39
Первые делители числа, кратные 8, 11, 15, 25, 40 и 100...
Вквквквквк
14.09.2020 19:39
Почему путь из варяг в греки так называется?...
пподрао
14.09.2020 19:39
Какое слово содержит чередую согласную в корне 1. прорубь 2.победа 3. зарница 4. камень...
gabenew
14.09.2020 19:39
Как могут соединяться однородные члены предложение? покаэи с схем...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
var n:integer;
begin
readln(n);
if n mod 2 = 0 then
writeln(n*n)
else writeln(n+5);
end.