Войти
Регистрация
Спроси ai-bota
В
Все
Х
Химия
В
Видео-ответы
А
Алгебра
Г
Геометрия
О
ОБЖ
Д
Другие предметы
У
Українська література
Р
Русский язык
Б
Беларуская мова
У
Українська мова
Э
Экономика
Ф
Физика
М
Математика
Ф
Французский язык
Г
География
И
Информатика
М
МХК
О
Окружающий мир
П
Психология
Н
Немецкий язык
О
Обществознание
П
Право
И
История
М
Музыка
Л
Литература
Қ
Қазақ тiлi
Б
Биология
А
Английский язык
Показать больше
Показать меньше
Amaliya211013
25.05.2021 06:58 •
Информатика
Написать программу, которая выводит на экран первую цифру числа, введёную с клавиатуры. (
Ответ:
zhurovalyuda
01.10.2020 17:19
Var a:integer;
begin
readln(a);
writeln(inttostr(a)[1]);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
marinka0810
21.02.2022 20:13
Могут ли циклы пересекаться друг с другом...
ПНШосннс
20.05.2022 11:15
Решить задачи по Информатике...
TheLoneRider
29.05.2021 18:44
Что не так с программой? Дан целочисленный массив из 40 элементов. Элементы массива могут принимать значения от - 10000 до 10000. Написать алгоритм, который находит и...
egorivanov2000
21.10.2020 00:54
Найти сумму двоичных чисел 101011 + 11011 Расписать столбиком!...
Зубканай
28.09.2022 03:02
Что будет выведено на экран после выполнения фрагмента программы: begin a:=3; if a 3 then a:=5 else a:=1; writeln (a); end. 1)1 2)5 3)3 4)ошибка...
lehfrb
25.03.2020 16:17
Скорость передачи данных через оптоволоконный интернет-канал Gроn составляет 200 Мбит/с. За какое время (в секунда будет передан файл размером 500 Мбайт?...
котик926
29.07.2022 00:00
Даны натуральные числа от 35 до 87. Разделите на 7. Найдите и напечатайте числа с остатком от 1,2 до не игнорить...
Jenya19885
25.07.2021 22:18
Нужна по заданию. Начинающий. Язык C# 1) Дан одномерный массив целых чисел длины m. Заполните его с клавиатуры. Найдите в данном массиве все элементы, кратные 6 и запишите...
Акбота1ю
20.01.2020 21:57
Расставьте в правильном порядке...
kimaleks1977
19.11.2022 12:30
Методом итераций вычислить корень уравнений вида f(x)=0, расположенный на интервале от [A,B], с абсолютной погрешностью. Определить так же число итераций, необходимое...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
begin
readln(a);
writeln(inttostr(a)[1]);
end.