Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
gramma116
26.10.2022 05:04 •
Информатика
Составьте программу на Паскаль, которая, введенное с клавиатуры число, возведёт в куб, если оно положительное, если отрицательное найдет его модуль, а если оно будет равно 0, то прибавить к нему 10.
Показать ответ
Ответ:
АннаФилип270406
11.10.2020 16:45
program N1;
var
a:integer;
begin
readln(a);
If (a>0) then writeln(a+1)
else writeln(a
Объяснение:
0,0
(0 оценок)
Популярные вопросы: Информатика
vikabosch
04.01.2023 03:26
Яке значення буде матизмінна і?var i, n: integer;begin n := 50; i := 0; while n = 180 do begin i := i + 1; n := n + 60;end;...
ilslim
06.07.2021 01:26
В чем заключается сущность численных методов интегрирования?...
дочь20
13.07.2022 00:09
На школьном дворе разбивают 4 клумбы прямоугольной формы. Первая клумба представляет собой квадрат со стороной 7 метров. Вторая клумба имеет форму прямоугольника, его стороны...
Евгения65545
22.04.2023 17:06
Які є типи запитань в режимі конструктора форм...
Fhftt3
13.08.2021 03:09
Вкоробке лежат 64 цветных карандаша.сообщение о том,что достали белый карандаш,несет 4бита.сколько белых карандашей было в коробке?...
brzruchkovika
27.05.2021 14:46
Какой должна быть частота дискретизации и глубина кодирования для записи звуковой информации длительностью 2 минуты, если в распоряжении пользователя имеется память объемом 5,1...
aysun222222
23.12.2022 22:33
Прямолинейный проводник по которому течет ток 10 А в некоторой точке создает магнитное поле напряженостью 13 А/м.определить расстояние от этой точки до проводника...
magrim600
21.08.2022 18:23
Написать программу для выставления значение функции f для заданного значение x:f(x)={4;x^2+3x+4;x+7 при x 0;0≤x 1;x 0...
rgn123
21.08.2022 18:23
По графику зависимости пути от времени определите значение наибольшей скорости....
EcLIpsЕ
21.08.2022 18:23
Упражнение Перепишите, расставляя знаки препинания. Какое предложение лишнее в этом упражнении? Почему? 1. Нам твердыня это имя. (А.К. Толстой) 2. Факты это воздух ученого. (И.Павлов)...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
program N1;
var
a:integer;
begin
readln(a);
If (a>0) then writeln(a+1)
else writeln(a
Объяснение: