Ввести трехзначное число .Вычислить корень квадратный второй цифры(паскаль)
Ввести трехзначное число .Вычислить корень квадратный второй цифры(паскаль)
Гость
Ответ(ы) на вопрос:
ГостьProgram n1;
var x,d: integer;
begin
write('введите число: ');
readln(x);
d:= x div 10 mod 10;
writeln(sqrt(d));
end.
Не нашли ответ?
Похожие вопросы