Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
О
ОБЖ
У
Українська мова
Д
Другие предметы
Х
Химия
М
Музыка
Н
Немецкий язык
Б
Беларуская мова
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
Р
Русский язык
У
Українська література
Ф
Французский язык
П
Психология
А
Алгебра
О
Обществознание
М
МХК
В
Видео-ответы
Г
География
П
Право
Г
Геометрия
А
Английский язык
И
Информатика
Қ
Қазақ тiлi
Л
Литература
И
История
Показать больше
Показать меньше
veroonikanovit
23.05.2020 06:45 •
Информатика
Как в паскале в ответе убрать 0 спереди? пример: 021-вводишь 21-выбивает компьютер ! без огромных кодов на 10 !
Показать ответ
Ответ:
русел222033
30.07.2020 18:29
Так :)
program p1;
var a:integer;
begin
writeln('Введите число: ');
read(a);
writeln('число: ',a);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
ева19961
21.11.2021 07:09
Напишите синквейн к словам ( макаронина, принтер) ...
Асем1211
13.01.2023 13:18
это информатика, это надо написать в лазарус я вопще нечего не понимаю надеюсь...
mazyrin91p08sby
23.06.2021 01:40
ДО ТЬНа вході маємо будь-яке число, яке запитується у користувача з повідомлення. Доки це число не перевершуватиме 80 воно буде збільшуватися у 2 рази та виводитися...
mariach1
27.10.2022 00:36
Скільки разів виконавець скаже Hello?1 . 5р2. 2р 3. 10р...
mafobe66
24.07.2020 13:15
Домашнє завданняЗнайти і надрукувати всі трицифрові числа сума кубів яких рівна самому числудокуprocedure TForm1.Button1Click(Sender: TObject);var a,b,c, i:integer;beginListBox1.Clear;for...
MATVEYPRO26
10.07.2020 22:31
Линейный алгоритм, состоящий из любого количества шагов, где формальный исполнитель покупает любой товар...
КЕНДИПИК
18.08.2020 02:16
Что это за файлы и можно ли их удалить? Когда я их открываю, высвечиваются какие-то буквы, цифры... ...
лера12061206
27.10.2022 14:46
Напишите программу чертёжник ,чтобы она нарисовала букву Ш и О (В кумире)...
den4ik143
31.07.2021 00:03
48 надо.составить программы с циклом пока и до, которые выведут на экран числа от 1 до 100 на паскале. не брать с других !...
petrovasofia0
17.12.2022 20:30
Запишите несколько примеров исполнителей-технических устройств, с которыми вы встречались в повседневной жизни (6 класс, информатика, с 80)...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
program p1;
var a:integer;
begin
writeln('Введите число: ');
read(a);
writeln('число: ',a);
end.