Информатика | 10 - 11 классы
В Pascal ввести с клавиатуры 20 чисел.
Найти среднее арифметическое отрицательных.
С клавиатуры вводится строка?
С клавиатуры вводится строка.
Подсчитать в ней количество слов.
Pascal ABC.
На экран вводится два пятизначных числа?
На экран вводится два пятизначных числа.
Найти среднее арифметическое всех четных цифр в наименьшем из чисел.
1) Задан массив из N чисел?
1) Задан массив из N чисел.
Найти среднее арифметическое.
2) Найти номер наибольшего элемента массива размером МхN.
Паскаль?
Паскаль.
Ввести N целых чисел.
Найти сумму чисел кратных 5 и не кратных 3.
Ввести с клавиатуры пятизначное число, вывести его в обратном порядке?
Ввести с клавиатуры пятизначное число, вывести его в обратном порядке.
Найти наименьшее общее кратное трех натуральных чисел в Pascal?
Найти наименьшее общее кратное трех натуральных чисел в Pascal.
Помогите с Паскалем?
Помогите с Паскалем!
)
1) Рассчитать площадь круга.
Радиус вводится во время программы
2) Рассчитать площадь кольца.
Данные вводятся во время выполнения программы.
3) С клавиатурой вводиться 5 чисел.
Найти их сумму, произведение и среднее арифметическое.
Ввести с клавиатуры 9 производных чисел (положительных и отрицательных)?
Ввести с клавиатуры 9 производных чисел (положительных и отрицательных).
Вычислить среднее арифметическое нечетных и отрицательных из них.
Нужна программа для паскаля.
В паскаль АВСЗаполнить массив А[1?
В паскаль АВС
Заполнить массив А[1.
8] числами, вводимыми с клавиатуры.
Найти среднее арифметическое четных элементов.
Помогитееее пожалуйста Как найти среднее арифметическое трёх чисел a + b + c / 3 Информатика 6 класс?
Помогитееее пожалуйста Как найти среднее арифметическое трёх чисел a + b + c / 3 Информатика 6 класс.
На этой странице находится ответ на вопрос В Pascal ввести с клавиатуры 20 чисел?, из категории Информатика, соответствующий программе для 10 - 11 классов. Чтобы посмотреть другие ответы воспользуйтесь «умным поиском»: с помощью ключевых слов подберите похожие вопросы и ответы в категории Информатика. Ответ, полностью соответствующий критериям вашего поиска, можно найти с помощью простого интерфейса: нажмите кнопку вверху страницы и сформулируйте вопрос иначе. Обратите внимание на варианты ответов других пользователей, которые можно не только просмотреть, но и прокомментировать.
Program n1 ;
var i, sum, a, k : integer ;
begin
sum : = 0 ;
k : = 0 ;
for i : = 1 to 20 do
begin
readln(a) ;
if a.