Войти
Регистрация
Спроси ai-bota
lilka23
04.06.2020 09:52
Дано целое число а. если значение а = 0, то необходимо увеличить его на 3, иначе присвоить а значение, равное 0. составьте на паскале программу для решения этой . программа должна иметь дружественный интерфейс
Нажмите на рекламу ниже и сразу увидите ответ
↓
Популярные вопросы:
siri9
29.04.2020 03:22
Коля готовился к контроль ной по .всего ему было задано решить n .каждый день коля решал различное количество ,успел ли он решить все если до контрольной оставалось k дней. в паскале...
nikitos15012
29.04.2020 03:22
Сколько кбайт в 5120 байт? сколько бит в 8.1 кбайт?...
112303
29.04.2020 03:22
Автоматическое устройство осуществило перекодировку информационного сообщения на языке длинною в 20 символов, первоначально записанного в 16 битном коде unicode, в 8-битную кодировку...
eDin7
07.10.2020 00:44
К случайным не относится угроза а)ошибка персонала б) форс-мажор в) ошибка автоматизированных систем г) программы закладки...
petrovakat2003
18.02.2021 19:12
Выведите на экран сумму кубов чисел от 5 до 11 умоляю ! 8 класс...
sover2000
08.08.2020 10:09
1. Как кодируется текст в памяти компьютера? 2. Как кодируется изображение в памяти компьютера?...
тролодо
05.12.2022 19:54
Написать программу нахождения гипотенузы прямоугольного треугольника по двум катетам! умоляю !...
alishraup
21.01.2021 03:32
Три девушки — Ира, Лина и Линда — очень талантливы. Они приобрели известность в разных видах искусств — пении, балете и кино. Все они живут в разных городах, поэтому родители часто...
PHVRVOH
14.03.2021 04:37
В трицифровом числе N зачеркнули первую цифру. Когда результат умножили на 10, а к произведению добавили первую цифру числа N, то получили число X. Найти число X, если известно значение...
ftf3
13.10.2020 22:50
Какие команды присваивания выполнены правильно 1)7+Y=:A 2)A=Y+2 3)A=Y 4)A:=Y...
Ответ:
дариана2006
07.10.2020 03:52
Program p17;
var A:integer;
begin
readln (A);
if A=0 then A:=A+3
else if A<>0 then A:=0;
writeln (A);
end.
0,0
(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота