1. Информатика
  2. Напишите в паскале. напишите

Напишите в паскале. напишите программу, которая по заданному числу вычисляет его вторую цифру справа. input.txt 123 -139 9 output.txt 2 3 0

Ученик132312 Ученик132312    2   09.09.2019 17:20    2

Ответы
arsenkam arsenkam  07.10.2020 03:37
Var
a,b,c:integer;
begin
read(a);
b:=a div 10;
c:=b mod 10;
writeln(c);
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
irinar1 irinar1  04.05.2020 11:14
Як відомо, Чебурашка потрапив з тропічного лісу в місто в ящику з апельсинами та жив у телефонній будці. Після знайомства з крокодилом Геною та Галею вони вирішили побудувати...
likiad123 likiad123  04.05.2020 11:14
3. Изучите скрипт и составьте блок-схему для данной задачи...
ппппппп25 ппппппп25  04.05.2020 11:13
Дан скрипт.Скрипт для спрайта CAR. Укажите действие пользователя, при котором начнется выполнение скрипта?​...
Møŝķá56 Møŝķá56  04.05.2020 10:58
2. На перший поверх будинку, у якому міститься велика фірма, спустився порожній ліфт. Вантажопідйомність ліфта – 500кг. Люди заходять до ліфта по черзі. Заповніть блок-схему...
kivonen3p08qoq kivonen3p08qoq  04.05.2020 10:35
Какая команда будет выполнена после следующих действий?1. Нажми на вкладку Файл, затем нажми на Создать. 2. Нажми на Новая презентация, а затем на кнопку Создать.1)Запись...
kodintsevmark kodintsevmark  04.05.2020 10:57
Напишите программу: 1. Ввести число. Если оно больше 10, разделить его на 2, если меньше или равно 10, то умножить на 5. 2. Ввести два числа. Если их сумма больше 100, то...
0ForeverUnicorn0 0ForeverUnicorn0  04.05.2020 10:56
Из чего состоит сеть Интернет? 3. Когда был создан прообраз сети Интернет? 4. Какая сеть легла в основу Интернет? 5. Когда появилась сеть Интернет в ее сегодняшнем виде?...
tarabrinadasha tarabrinadasha  04.05.2020 10:56
Установите соответствие между числами и минимально возможными основаниями систем счисления, которые им соответствуют. 1)3423 2)11101 3)888 4)А77 А)2 Б)9 В)5 Г)11...
imrangaraev imrangaraev  04.05.2020 10:56
Егер n = 5 болса, псевдокодтың орындалу нәтижесі неге тең болады? Алг сандар көбейтіндісі (арг бүт n, нәт бүт P) берілгені |n 0 қажет |P=1*2*3*...*n басы бүт i енгізу n;...
SergeyS9 SergeyS9  04.05.2020 10:55
Какие инструменты входят в группупреобразования линий 3D инструментов?​...

Популярные вопросы