tutotveti.ru
Предметы
Биология
Українська мова
Музыка
Французский язык
Физика
МХК
Обществознание
Психология
ОБЖ
Право
Беларуская мова
Литература
Химия
Українська література
Экономика
Немецкий язык
География
Информатика
Қазақ тiлi
Геометрия
Английский язык
Русский язык
Окружающий мир
Алгебра
История
Другие предметы
Видео-ответы
ПОИСК
Войти
Регистрация
Информатика
Решите на паскале на if case.если
Решите на паскале на if case.если введённое число положительное, то вычесть из него 5, если равно нулю, то прибавить 20, во всех остальных случаях разделить на 6
ruevtop
2 26.09.2019 22:01
1
Ответы
Пашаg
08.10.2020 21:12
Var
n:real;
begin
Write('Введите число: ');
Readln(n);
if n>0 then n:=n-5
else if n=0 then n:=n+20
else n:=n/6;
Writeln('n=',n)
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
dali666
17.12.2020 10:54
1. Qanday platformalarga ochiq kodli CMS platformalar deyiladi? Ularga misol keltiring. 2. Qanday platformalarga yopiq kodli CMS platformalar deyiladi? Ularga misol keltiring.3....
муратмурмур
17.12.2020 10:52
В массиве размерностью 3х7 вычислить среднее арифметическое элементов массива равных удвоенному произведению минимального элемента....
Legendplay228
17.12.2020 10:50
2. Укажите алгоритм сохранения растрового графического изображения по новым имени а) В меню Файл выбрать команду Сохранить как написать нмя и указать местосохранения файла6)...
LutsenkoRodion
17.12.2020 10:50
| | || || ||EILua5. Арман создал рисунок в Pant. Посмотри на рисунок и укажи 2 инструмента, которыеиспользовал Арман|1инструмент2инструмент...
Анна121314151
17.12.2020 10:49
Реши пример Дана программа на языке программирования Паскаль для решения данного примера. Заполни пропуски....
ведитеник
17.12.2020 10:49
просто ответ без решения ...
pashafil5
17.12.2020 10:48
решить определите ip-адрес:3.154.17830.64...
malinasch
17.12.2020 10:47
A-2bc17 sinaНАПИШИТЕ НА ЯЗЫКЕ Python выражение...
AlionaCeban
17.12.2020 10:47
6. Как называется программа для создания и редактирования векторных изображений? a) Photoshop6) VideoPadв) Incskapeг) Paint...
Ragman007
17.12.2020 10:47
Составить программу и начертить блок-схему, которая просуммирует числа кратные к на интервале от b до с включительно...
Популярные вопросы
195622: 178 как решить столбиком пример...
2
Семья,это одушевлённый или неодушевлённый?...
1
Не меняя местами цифры 1 2 3 4 5 получить 40...
2
Переставь в слове салат буквы местами, найди два получившихся слова...
2
На ! механическая работа может быть вычеслена по формуле: где - - -...
3
Люди надо решение пропорции : 2.4: x=6: 4.5...
1
4p(p-c)(c+p)представить в виде многочлена...
3
Надо! 1).женщина продавала яйца. первая покупательница купила у нее половину...
1
Найди в предложениях главные члены.укажи число,лицо или род частей речи,которыми...
2
Какое слово можно подобрать для чередования согласной к слову земляничное....
3
n:real;
begin
Write('Введите число: ');
Readln(n);
if n>0 then n:=n-5
else if n=0 then n:=n+20
else n:=n/6;
Writeln('n=',n)
end.