Ввести с клавиатуры 3 числа выдать на экран те числа которые принадлежит отрезку [-5;10]
10-11 класс
|
uses Crt;
var i,n :integer;
begin
for i:=1 to 3 do
begin
readln(n);
if ((n > -6) and ( n < 11 )) then
writeln('chislo ',n,' prenadlejyt ');
end;
readln
end.
Program abc;
var a,b,c:real;
begin
writeln('Введите 3 числа');
readln(a,b,c);
If (a>=-5) and (a<=10) then writeln(a);
If (b>=-5) and (a<=10) then writeln(b);
If (c>=-5) and (a<=10) then writeln(c);
end.
Другие вопросы из категории
являющихся нечётными числами.
Читайте также
каждый его элемент был равен утроенному значению его порядкового номера (индекса). 3. Ввести массив с клавиатуры, найти и вывести сумму элементов массива. 4. Ввести массив с клавиатуры, подсчитать, сколько в нем положительных элементов, а сколько отрицательных. 5. В одномерном массиве подсчитать, сколько отрицательных элементов находится на четных местах и сколько положительных на нечетных. 6. Элементы массива вводятся с клавиатуры, заменить в нем все отрицательные элементы их квадратами, а положительные кубами. Вывести на экран исходный и новый массив. 7. Ввести массив с клавиатуры, найти и вывести на экран максимальный и минимальный элементы. 8. Написать программу, которая определяет есть ли в массиве элемент введенный пользователем, подсчитывает их количество и выводит номер первого найденного элемента.
а)удвоенное значение числа,если число положительное; б)абсолютное значение числа,если число отрицательное.
2)Напишите программу которая анализирует введенное с клавиатуры число на четность и сообщает о результате.
числа n.
№3
Вычислить значение факториала n!
№4
В диапазоне от 1 до n вывести все четные числа на экран.
№5
Найти количество чисел, которые делятся на 3 и 5, из диапазона от 1 до n.
2) ввести с клавиатуры массив из n элементов вывести на экран максимальный четный элемент и минимальный нечетный элемент
выведите их произведение. Если третье и четвёртое числа больше100, то выведите среднее арифметическое всех пяти чисел. Если выполняются одновременно два перечисленных выше условия, то выведите на экран все пять чисел без изменения. Иначе, выведите третье и пятое числа, увеличив их в два раза.