сервис вопросов и ответовС клавиатуры вводятся 100 чисел. Найти сумму тех из них, которые больше 10.
5-9 класс|
|
На языке Паскаль. Очень нужно!
Fr0sTiK1234
25 авг. 2013 г., 18:42:02 (10 лет назад)
YмHuk
25 авг. 2013 г., 21:37:40 (10 лет назад)
const
n = 100;
auto = false;
var
num, s: real;
i: integer;
begin
for i := 1 to n do
begin
if auto then
num := random(100) - 50
else readln(num);
if num > 10 then
s := s + num;
end;
writeln(s);
end.
Doodochka
25 авг. 2013 г., 23:39:28 (10 лет назад)
хочу я посмотреть на того кто 100 чисел с клавы будет вводить
Ответить
Другие вопросы из категории
помогите нужен кроссворд на тему информатика выполненный в PowerPoint с гиперссылкой а также тесты ребусы. Помогите может кто нибудь знает где
можно это скачать ну или кто нибудь это умеет делать.
Выполните сложение и умножение в двоичной системе счисления:
1001111+1001010=?
11001×111=?
помогите пожалуйста.
Читайте также
ПОМОГИТЕЕЕЕ!!!:С Введите с клавиатуры 5 положительных чисел.Вычислите сумму тех из них,которые делятся на 4 и при этом заканчиваются на
6.Программа должна вывести одно число:сумму чисел,введенных с клавиатуры, кратных 4 и оканчивающихся на 6.
1)Определить если в
составе двухзначного
числа одинаковые цифры.
2)Вводятся 2 числа одного
ли они знака?
3)Вводиться двухзначное
число, посчитать
произведение чисел.
4)Принадлежит ли х
отрезку 1.5?
5)является ли ввод с
порядковым номером у
высокосным или нет
6)Вводиться 4 числа,
посчитать сумму
произведений
отрицательных чисел.
7)Вводиться 5 чисел найти
сумму чисел меньше 3, и
произведение чисел
больше 5.
8)Вводиться число
определить его знак.
9)Вводиться 6 чисел найти
сумму произведений тех
из них которые больше 10.
Язык pascal ABC
Введите 5 положительных уныл чисел, вычислите сумму тех из них которые делятся на 4, и оканчиваются на 6. Если таких чисел нет, то вывести об этом сообщение.
Вы находитесь на странице вопроса "С клавиатуры вводятся 100 чисел. Найти сумму тех из них, которые больше 10.", категории "информатика". Данный вопрос относится к разделу "5-9" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.