Напишите программу, которая в последовательности натуральных чисел определяет количество четных чисел, некратных 6 (, < >).. Программа получает на вход количество чисел в последовательности, а затем сами числа. Количество чисел не превышает 100. Введённые числа не превышают 300. Избранные числа всегда есть. Программа должна вывести одно число.
2. Напишите программу, которая в последовательности натуральных чисел определяет сумму 3-хзначных чисел, оканчивающихся на 7 и среднее значение суммы таких чисел. Программа получает на вход количество чисел в последовательности, а затем сами числа. Количество чисел не превышает 1000. Введённые числа не превышают 30 000. Программа должна вывести два числа. Если избранных чисел нет, то программа должна вывести «нет».
язык программирования PascalABC.
Формулы площадей квадрата S₁ и круга S₂ известны, что легко позволяет нам найти нужное условие.
Если нужно, чтобы случай, когда квадрат вписан в круг тоже учитывался, строгое неравенство следует заменить нестрогим.
// PascalABC.NET 3.0, сборка 1160 от 05.02.2016
begin
var s1:=ReadReal('Площадь квадрата');
var s2:=ReadReal('Площадь круга');
if pi*s1<2*s2 then Writeln('Квадрат умещается в круге')
else Writeln('Квадрат не умещается в круге')
end.
Тестовое решение:
Площадь квадрата 24.6
Площадь круга 28.4
Квадрат не умещается в круге
1) это сведения о чём то
2)обоняние , осязание, зрение , слух.
3) Блок питания
— Центральный процессор
— Внешняя видеокарта (ее разъем PCI, AGP, PCI-Express)
— Оперативная память
— Оптический DVD привод
— Трехдюймовый дисковод гибких дисков (FDD 3,5)
— Жесткий диск (винчестер)
— Материнская плата (фиолетовая)
4) Основными устройствами вывода являются монитор, принтер, плоттер акустические колонки, наушники.
5) Backspace
6) PageDown
7) это то что содержит и хранит информацию
8) клавиатура
9) Сканер
10) клавиатуре, Диска, принтере или на бумагу
Объяснение: