Вычислить значение модуля квадратного корня заданного трёхзначного числа.
10-11 класс
|
Program n1;
Uses CRT;
Const n=7;
Var a: integer; x: real;
begin
readln(a);
x:=abs(sqrt(a));
writeln(x:4:4);
readln
end.
Другие вопросы из категории
Помогите решить Д/З по ИКТ
1.считая,что каждый символ кодируется одним байтом,оцените информационный объём следующего предложения в одном килограмме 1000 грамм
2.В бассейне ведётся наблюдение за температурой воды. результатом одного измерения является целое число от +10 до +35 градусов,которое записывается при помощи минимального количества бит. Было сделано 27 измерений. Определите информационный объем всех результатов наблюдений
3.Световое табло состоит из лампочек,каждая из которых находится в одном из двух состояний("Включено" или "Выключено"). Какое наименьшее количество лампочек должно находиться на табло,чтобы с помощью его можно было передать 200 различных сигналов?
Читайте также
2.Составить алгоритм вычисления разности кубов цифр, заданного восьмизначного числа.
3. Для заданного действительного числа К вычислить значение произведения
(99/k^3-98)*(97/k^3+96)*(95/k^3-94)*...*(3/k^3+2)
x=2
2) "нет решений", если x=0
3) 3x в квадрате минус 5, если X=3,4,5,6.
Задание 2) - Составить алгоритм и программу
Написать программу, которая определяет по последней цифре числа последнюю цифру его квадрата.
Прошу написать полное решение программы,
Спасибо Заранее
0.1E + 05, -33.3E - 4, 25.5E + 0?
Запишите по правилам языка Паскаль такие выражения:
a) 1.5 + 2 (x^2 + bx)
b) 3(x + 5) - x^3
_____________
2x^2 + x
Вычислить значения выражений :
a) 125 mod 30
b) 20 div 6 mod 5
Записать выражения в общепринятой форме:
a) (-2*b+3*b-4*a*c)/3*a
Пусть a, b: integer, c: real. Определите тип выражения (целый или вещественный) :
a) a/b
b) a + b
c) a + c
Чему равны значения переменных x и y после выполнения команд: x:=2 ; y:=5 ; y:=x ; x:=x+1?
Решите, пожалуйста, хоть одно какой-нибудь задание. СРОЧНО НУЖНО!