tutotveti.ru
Предметы
Биология
Українська мова
Музыка
Французский язык
Физика
МХК
Обществознание
Психология
ОБЖ
Право
Беларуская мова
Литература
Химия
Українська література
Экономика
Немецкий язык
География
Информатика
Қазақ тiлi
Геометрия
Английский язык
Русский язык
Окружающий мир
Алгебра
История
Другие предметы
Видео-ответы
ПОИСК
Войти
Регистрация
Информатика
Составить программу на pascal.
Составить программу на pascal. условие: введите число f c клавиатуры и если чило f> 3,то f-5 если f=3,то f-2 если f< 3, то f+1
drwnd
1 08.08.2019 08:50
0
Ответы
bryazgin98p06isp
04.10.2020 04:40
Var
f: integer;
begin
readln(f);
if f > 3 then f := f - 5
else if f = 3 then f := f - 2
else f := f + 1;
writeln(f);
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
marsianin121
04.09.2019 03:00
Напишите что можно и нельзя делать на уроке информатики...
sab2021
30.05.2019 04:50
Считая что каждый символ кодируется 8-ью битами определите информационный объем высказывания американского ученого бенджамина франклина: лень делает всякое дело...
azamatmarahimov
30.05.2019 04:50
Сколько байт необходимо доя записи числа 100...
ksyu5551
12.04.2020 18:29
5 5 ga 15 5 ga X=10 сделать алгоритм ...
juliagolub2015
11.04.2020 12:03
Задание по информатике: Элементы схемотехники. Логические схемы Решите как можно быстрее...
11nastyaaaaa11
11.04.2020 12:03
Напишите программу ,которая находит все четные натуральные числа ,не превосходящие число N...
PolinaCat29
11.04.2020 12:03
1.Запишите раздел описания переменных и операторы, необходимые для вычисления квадратного уравнения 2.Запишите раздел описания переменных и операторы, необходимые...
MASCAM
11.04.2020 12:03
11. На скільки змінитьсярозмір виконавця у результатівиконання фрагментапрограми? *О 100О120O 140160...
HLNLZ
13.04.2020 15:56
Что делать если удалил папку system64?!...
vipvip16tk
13.04.2020 15:56
Как записывается данный алгоритм на языке Паскаль зарание...
Популярные вопросы
ВАС РАССКАЗ «ДОМАШНЕЕ СОЧИНЕНИЕ»!!...
1
536 : 2 465 : 3 328 : 2 768 : 4 315 : 7 234 : 6 432 : 9 536...
3
Строевые упражнения – это: а) попеременно двухшажный ход б)...
3
Почему несоблюдение подростками режима дня, режима питания и...
3
Яки нови жанры украинськои народнои творчости выныклы в период...
3
С БИОЛОГИЕЙ Подумайте и ответьте на во Числохрящевых рыб невелико....
3
Как формировалась русско японская граница. как формировалась...
3
1) Последовательно в цепь соединены 5 одинаковых резисторов(резистора)....
1
Рассчитайте массу осадка, полученного при взаимодействии 304...
3
1)Выполнить действия :а)8,4*(-5,7) б) 22,23:(-0,9) в)-28,98:(-14)...
1
f: integer;
begin
readln(f);
if f > 3 then f := f - 5
else if f = 3 then f := f - 2
else f := f + 1;
writeln(f);
end.