составьте программы на языке программирования для решения задачи : Число А вводиться с клавиатуры если оно положительно то извлечь из него квадратный
10-11 класс
|
корень иначе возвести его в квадрат результат вывести на экран
На языке Pascal
var a,r:real;
begin
writeln('Введите число');
readln(a);
if a>0 then
begin
r:=sqrt(a);
writeln('r= ', r:6:3);
end
else
begin
r:=sqr(a);
writeln('r= ', r:6:3);
end;
end.
Другие вопросы из категории
равны соответственно 16 бит и 8 кГц
2) В компьютер вводится результат для 10 абитуриентов. Вывести на экран фамилии и результат тех, кто попадает в интервал ( 10, 30) Подсчитать среднее арифметическое.
3) Дан массив из 10 элементов. Определить 2х значные числа и которые заканчиваются на цифре 5.
Читайте также
углов.
2)
Напишите пожалуйста программу (на языке BASIC) для определения подобия:
а) двух прямоугольников по двум смежным сторонам;
б) двух треугольников по трем сторонам.
Составить схему алгоритма и программу на языке программированияBasic для решения задачи по обработке одномерного массива.
Для любого четырехзначного вводимого числа найти сумму второй и предпоследней цифры).
(Подсказка. Используйте тип данных integer и операции div и mod)
Известна площадь квадрата. Найдите периметр и диагональ квадрата