Паскаль дано натуральное число.найти первую и последнюю цифру
aru1608
2
17.05.2019 10:30
1
Другие вопросы по теме Информатика
S1mplendnnd
20.05.2021 20:31
Главрыба
20.05.2021 20:29
влад2220
11.02.2022 13:36
rubon
11.02.2022 13:39
konsantin1805
11.02.2022 13:39
7575757575
11.02.2022 13:41
школаник51
11.02.2022 13:43
vikysikrusinova
11.02.2022 13:45
Тимофей225
09.09.2019 02:50
КЁНУЛЬ07
09.09.2019 02:50
Популярные вопросы
- Рассмотреть географию МРТ и составить «визитные карточки» для тех или...
2 - Найти примеры величины k , при которых функции y1= 3*e^(-(x^2)) и y2=...
2 - Расскажи о школьнике, столкнувшемся с уличными законами жизни в небольшом...
3 - Приведите примеры из жизни:когда и почему необходимо учитывать химическое...
3 - Первую четверть всего пути поезд со скоростью 60 км/ч. Средняя...
3 - Обозначь определение такого процесса,как шизогония:одвижение в ответ...
1 - 1. Раскройте скобки: а) (с – х)2; б) (р + 3)2; в) (7у – 5)2; г) (4k...
3 - Вы преподаете математику в 7-м классе математической вертикали. Из...
1 - Яку німецьку букву потрібно вставити beg_uten, mal_risch...
2 - Найдите остаток от деления 9^10 на 7...
2
Program Pr1;
var a:integer;
Begin
readln(a);
writeln('Posl.- ',a mod 10);
while a div 10 <>0 do a:=a div 10;
writeln('Perv.- ',a);
end.