Войти
Регистрация
Спроси ai-bota
В
Все
Б
Биология
Б
Беларуская мова
У
Українська мова
А
Алгебра
Р
Русский язык
О
ОБЖ
И
История
Ф
Физика
Қ
Қазақ тiлi
О
Окружающий мир
Э
Экономика
Н
Немецкий язык
Х
Химия
П
Право
П
Психология
Д
Другие предметы
Л
Литература
Г
География
Ф
Французский язык
М
Математика
М
Музыка
А
Английский язык
М
МХК
У
Українська література
И
Информатика
О
Обществознание
Г
Геометрия
Показать больше
Показать меньше
димасвлас
01.04.2021 15:22 •
Информатика
Написать программу y={(a=3), если a> 0 {(a-3), в остальных случаях
Показать ответ
Ответ:
martin37
07.09.2020 13:20
Var
a,y:integer;
begin
readln(a);
if a>0 then
begin
a:=3;
writeln(a);
end
else
begin
y:=a-3;
writeln(y);
end;
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
anjaps
07.05.2022 16:22
Исходное данное — трёхзначное число x. Выполни для x=144 следующий алгоритм. a:=xdiv100 b:=xmod100 c:=xmod10 s:=a+b+c...
seks73839
07.05.2022 16:22
в течение не сколько мин...
Jessicacoen
22.01.2021 20:14
Определите тип алгоритма для указанных команд.ответ записывай строчными (маленькими) буквами. ответ начинай со слова алгоритм акогда щелкнут поидти 30 шаговговорить...
11martandreyp0bwg2
02.01.2022 19:03
.Требовалось написать программу, которая меняет местами значения двух переменных в памяти. Программист торопился и написал программу так: a = b b = a a b 1 2 a = b...
Про228ooo
14.10.2020 22:31
Исходное данное — трёхзначное число x. Выполни для x=144 следующий алгоритм. a:=xdiv100b:=xmod100c:=xmod10s:=a+b+c...
nikniksergeev1
27.11.2020 02:07
2. Определите тип алгоритмадля указанных команд *когда щелкнут поBoernaидти 10 шаговследующий костюмесли на краю, оттолкнуться...
beka98888
29.05.2022 04:49
Запишите команды, с которых можно: 1) записать в переменную d последнюю цифру числа, находящегося в переменной N: d = 2) отбросить последнюю цифру числа, находящегося...
poli148
06.02.2023 02:14
Известно скорость двух автомобилей какое расстояние будет между ними через 3 часа если автомобили выехали из одного пункта? программа паскаль...
molkes
01.11.2020 20:46
Как называется информация представлена с букв алфавита ?...
valovaliza2018
13.08.2020 15:38
Вводятся две целочисленные переменные aa и bb. напишите программу, которая находит значение выражения: (a+b)2+(a−b)2−3ab...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
a,y:integer;
begin
readln(a);
if a>0 then
begin
a:=3;
writeln(a);
end
else
begin
y:=a-3;
writeln(y);
end;
end.