Информатика | 10 - 11 классы
C клавиатуры вводятся 30 чисел.
Найти произведение положительных чисел.
Вводить с клавиатуры 10 целых чисел, выдать на экран количество положительных чисел, количество отрицательных , количество нулевых?
Вводить с клавиатуры 10 целых чисел, выдать на экран количество положительных чисел, количество отрицательных , количество нулевых.
С клавиатуры последовательно вводится 10 чисел?
С клавиатуры последовательно вводится 10 чисел.
Найти количество положительных чисел.
Срочноо!
Решите пожалуйста на Паскале.
Найти сумму целых положительных чисел из промежутка от А до В, кратных 4 (значения переменных А и В вводятся клавиатуры)?
Найти сумму целых положительных чисел из промежутка от А до В, кратных 4 (значения переменных А и В вводятся клавиатуры).
С клавиатуры вводятся целые числа?
С клавиатуры вводятся целые числа.
Признаком конца ввода чисел является 0.
Изменить знак отрицательных чисел на положительный.
Результаты вывести на экран.
С клавиатуры вводится два числа?
С клавиатуры вводится два числа.
Найти сумму, разность, произведение, и частное этих чисел.
Среди n введенных с клавиатуры чисел, найти сумму положительных и произведение отрицательных чисел?
Среди n введенных с клавиатуры чисел, найти сумму положительных и произведение отрицательных чисел.
С клавиатуры вводится несколько чисел?
С клавиатуры вводится несколько чисел.
Найти сумму чисел кратных 5 и кол - во положительных.
С клавиатуры вводятся числа пока их сумма меньше 300?
С клавиатуры вводятся числа пока их сумма меньше 300.
Найти произведение отрицательных чисел делящихся на 3.
С клавиатуры вводятся 17 чисел?
С клавиатуры вводятся 17 чисел.
Найти произведение положительных чисел не делящихся на 17.
Решить в паскале, методом repeat.
Until.
С клавиатуры вводится l целых чисел?
С клавиатуры вводится l целых чисел.
Подсчитать кол - во нечетных чисел и произведение положительных.
Если вам необходимо получить ответ на вопрос C клавиатуры вводятся 30 чисел?, относящийся к уровню подготовки учащихся 10 - 11 классов, вы открыли нужную страницу. В категории Информатика вы также найдете ответы на похожие вопросы по интересующей теме, с помощью автоматического «умного» поиска. Если после ознакомления со всеми вариантами ответа у вас остались сомнения, или полученная информация не полностью освещает тематику, создайте свой вопрос с помощью кнопки, которая находится вверху страницы, или обсудите вопрос с посетителями этой страницы.
Var a, b, c : integer ;
begin
writeln('введите 30 чисел') ;
readln(a) ;
b : = 1 ;
c : = 1 ;
while b< ; > ; 30 do begin
if a > ; 0 then c : = a * c ;
readln(a) ;
b : = b + 1 ;
end ; writeln('ответ', c) ;
end.