Дано целое положительное четырехзначное число. Напишите программу, позволяющую определить двузначное число, в котором число десятков соответствует первой цифре заданного числа, а число единиц-последней. Например: 3234 => 34.

23 Фев 2020 в 19:41
151 +1
0
Ответы
2

uses CRT;

 var x: integer;

Begin

 Clrscr;

 Write′Number:′'Number: 'Number:;

 Readlnxxx;

 Writexdiv1000,xmod10x div 1000, x mod 10xdiv1000,xmod10;

 readln

end.

24 Фев 2020 в 10:35

var a, b: integer;

Begin

Write′a=′'a = 'a=;

Readlnaaa;

b:=a div 1000*10 + a mod 10;

Writebbb;

end.

24 Фев 2020 в 11:22
Не можешь разобраться в этой теме?
Обратись за помощью к экспертам
Гарантированные бесплатные доработки в течение 1 года
Быстрое выполнение от 2 часов
Проверка работы на плагиат
Поможем написать учебную работу
Прямой эфир