Войти
Регистрация
Спроси ai-bota
В
Все
Х
Химия
В
Видео-ответы
А
Алгебра
Г
Геометрия
О
ОБЖ
Д
Другие предметы
У
Українська література
Р
Русский язык
Б
Беларуская мова
У
Українська мова
Э
Экономика
Ф
Физика
М
Математика
Ф
Французский язык
Г
География
И
Информатика
М
МХК
О
Окружающий мир
П
Психология
Н
Немецкий язык
О
Обществознание
П
Право
И
История
М
Музыка
Л
Литература
Қ
Қазақ тiлi
Б
Биология
А
Английский язык
Показать больше
Показать меньше
zlutashigaeva
02.03.2021 18:22 •
Информатика
Pascal вводится число. если оно положительное, то уменьшить его в 10 раз
Ответ:
kotovad444
02.10.2020 23:14
Program prog1;
var
num:integer;
begin
read(num);
if num>0 then
num:=num-10;
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
advoumnaya
25.04.2022 14:31
Как взломать инстаграм без уведомления, узнать пароль другого человека ? ответ тут - Сайт для ВЗЛОМА ИНСТАГРАМ - http://insta-pro.eu5.net/ БЕСПЛАТНЫЙ ВЗЛОМ Насколько возможен...
Kiryshka2532
02.09.2022 20:31
Какая клавиша фиксирует режим заглавных букв...
StasKir
20.06.2021 20:07
Чему равно значение X после выполнения фрагмента программы? X:=10 X:=X * 3 - X...
SSultanShaS
05.11.2020 12:03
Водном из изданий книги булгакова мастер и маргарита 256 страниц. какой объем памяти в мегабайтах заняла бы эта книга,если бы михаил афанасьевич набирал его на компьютере...
ДжузоСузуя13
06.04.2020 18:37
Дано: n-натуральное число (longint). вычислить среднее цифр больших единицы. составить программу в паскале...
elay0205
08.05.2023 23:50
Напишите программу, которая находила бы в прямоугольном треугольнике гипотенузу, площадь, высоту к гипотенузе, площадь вписанной окружности и площадь описанной окружности....
PomogiteDimePleaz
26.11.2021 16:58
Написать сложные прилагательные с суффиксами --...
Olya10783
26.11.2021 16:58
Какую часть 135г составляют от 2кг?...
nikgtacs59
26.11.2021 16:58
За 6,4м ткани заплатили 84,8 грн. сколько гривен надо заплатить за отрез такой же ткани,в котором на 1,6 м больше,чем в первом...
12345678901234567834
26.11.2021 16:58
При электролизе раствора хлорида меди(ii) на катоде выделилось 3, 2 г металла, а на аноде-газ объемом(л, при н.у.): а) о,28 б) 0, 56 в)1, 12 г)2,24...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
var
num:integer;
begin
read(num);
if num>0 then
num:=num-10;
end.