Составить программу, которая выводит на экран число, полученное при перестановке первой и последней и второй и третьей цифр заданного числа

@soboleva_lelya · Регистрация: 12.03.2013

Студворк — интернет-сервис помощи студентам

Пользователь вводит четырехзначное число. Составить программу, которая выводит на экран число, полученное при перестановке первой и последней и второй и третьей цифр заданного числа. Извлечь квадратный корень полученного числа. помогите плиз!!!

Новичок · 12.03.2013, 15:03

Pascal

program lab_pascal;
uses Crt;
var num,p:Integer;
begin
ClrScr;
Write('Введите четырехзначное число:');
Readln(num);
while num<>0 do
begin
p:=p*10+num mod 10;
num:=num div 10;
end;
Writeln('Полученное число: ',p);
Writeln('Корень квадратный: ',sqrt(p):0:4);
Readln;
end.

@soboleva_lelya 0 / 0 / 0 Регистрация: 12.03.2013 Сообщений: 10
		1
	Составить программу, которая выводит на экран число, полученное при перестановке первой и последней и второй и третьей цифр заданного числа 12.03.2013, 11:32. Показов 3449. Ответов 1 Метки нет (Все метки) Пользователь вводит четырехзначное число. Составить программу, которая выводит на экран число, полученное при перестановке первой и последней и второй и третьей цифр заданного числа. Извлечь квадратный корень полученного числа. помогите плиз!!! 0

Опции темы

Составить программу, которая выводит на экран число, полученное при перестановке первой и последней и второй и третьей цифр заданного числа

Решение