Войти
Регистрация
Спроси ai-bota
Dyba
20.09.2022 08:42
B) ввести число. если его модуль больше 7, уменьшить число в 1,5 раза, в противном случае увеличить в 7 раз.
Нажмите на рекламу ниже и сразу увидите ответ
↓
Популярные вопросы:
Марта20012
18.09.2020 23:03
По шестнадцатеричной форме внутреннего 2-х байтового представления целого числа восстановить само число в десятичной системе счисления: F7CB....
Губанова1234
14.01.2020 18:22
Задача 2. Нехай задано натуральне число. Якщо воно ділиться на 6. то потрібно його розділити на 6.Щоб число ділилося на 6, воно повинно ділитися на 2 і на 3.А ознаки подільності на...
MarinkaJones
22.01.2020 08:11
Дано двузначное число . найти квадрат суммы его цифр...
fhderDgy
17.02.2023 15:47
№1К каждой из 6-и функций привести по три примера: с положительным числом, с отрицательным числом, когда нет решения.К 7-ой функции (Random) привести 6 примеров с положительными и...
shevchukmaria2
10.12.2020 22:54
В книге 30 страниц. Сколько информации содержит сообщение о том, что читатель остановил чтение на странице № 8?...
Liova23
10.02.2021 20:29
Основы алгоритмизации Перевод на русский: Если П=..., тогда поменять местами наименьший элемент с последним. При невыполнении условия оставить массив без изменений....
snezhana0709
10.02.2021 20:29
сделать линейный алгоритм на Язык Паскаля и заодно решить. Буду благоприятен!...
Натальяроссия
01.06.2020 17:17
Для каждого из указанных значений числа x истинно выражение x -6 v x -9 1)-10 2)-8 3)-6 4)-9...
Раисат432178
26.04.2022 11:27
Дано натуральне число n. Скласти програму обчислення значення виразу: 1/sin1+1/sin1+sin2+... +1/sin1+sin n. Результат округлими до сотих. Треба зробити в Pascal...
Nastya8laif
15.04.2020 04:33
Өңдеудің кіріктірілген ортасында битпен берілген ақпарат көлемін байтқа, килобайтқа және мегабайтқа ауыстыру бағдарламасын құру керек....
Ответ:
Nightfury1012552
07.10.2020 23:13
Var n:real;
begin
readln(n);
if abs(n)>7 then begin
n:=n/1.5;
end else begin
n:=7*n;
end;
writeln(n);
end.
0,0
(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота