Напишите в тетради программы на Паскале для решения следующих задач:
Задача 1. Введено трехзначное целое число Х. Получите их него новое пятизначное число Y, приписав слева и справа к числу Х количество его десятков.
Пример: x=456, y=54565
Задача 2. Введено четырехзначное число Х. Найдите произведение первой и третьей цифры данного числа; сумму второй и четвертой цифры данного числа.
Ответы
Ответ дал:
0
program Job;
var a,b,c:integer;
begin Writeln('Введите число');read(a);b:= a div 10 mod 10;Writeln(b,a,b);
end.
var a,b,c:integer;
begin Writeln('Введите число');read(a);b:= a div 10 mod 10;Writeln(b,a,b);
end.
Приложения:
![](https://st.uroker.com/files/6c7/6c7bb801aeca2cc0354b3c6290bd1441.png)
Ответ дал:
0
это 1 задача?
Вас заинтересует
1 год назад
1 год назад
2 года назад
2 года назад
8 лет назад
8 лет назад