Информатика | 5 - 9 классы
Паскаль ввести несколько чисел.
Найти сумму чисел лежащих в интервале от 10 до 15.
Ввести массив из 30 производных чисел и найти сумму всех отрицательных(паскаль)?
Ввести массив из 30 производных чисел и найти сумму всех отрицательных(паскаль).
Помогите пожалуйста) Ввести с клавиатуры N чисел?
Помогите пожалуйста) Ввести с клавиатуры N чисел.
Найти произведение тех из них, которые принадлежат интервалу ( - 2 ; 2).
В Паскале.
Найти сумму чисел?
Найти сумму чисел.
Числа ввести с клавиатуры.
Написать программу.
Ввести несколько чисел, определить каких чисел больше - положительных или отрицательных?
Ввести несколько чисел, определить каких чисел больше - положительных или отрицательных.
Напишите программы в abc паскале пожалуйста : 1)надо ввести три числа и найти из них наибольшее ; 2)надо ввести пять чисел и найти из них наибольшее ЗАРАНЕЕ СПС?
Напишите программы в abc паскале пожалуйста : 1)надо ввести три числа и найти из них наибольшее ; 2)надо ввести пять чисел и найти из них наибольшее ЗАРАНЕЕ СПС!
Cnt2_3 Ввести 6 чисел, подсчитать количество чисел принадлежащих интервалу (10 ; 12, 3]?
Cnt2_3 Ввести 6 чисел, подсчитать количество чисел принадлежащих интервалу (10 ; 12, 3].
Найти сумму всех чисел крастных 7 в интервале от 22 до 120 Можете пожалуйста составить программу на Паскале?
Найти сумму всех чисел крастных 7 в интервале от 22 до 120 Можете пожалуйста составить программу на Паскале.
Найти сумму двух чисел в паскале?
Найти сумму двух чисел в паскале.
Ввести с клавиатуры n - любых чисел , найти количество отрицательных чисел( Паскаль )?
Ввести с клавиатуры n - любых чисел , найти количество отрицательных чисел( Паскаль ).
Найти сумму трёх чисел (работать в паскале)?
Найти сумму трёх чисел (работать в паскале).
На этой странице находится ответ на вопрос Паскаль ввести несколько чисел?, из категории Информатика, соответствующий программе для 5 - 9 классов. Чтобы посмотреть другие ответы воспользуйтесь «умным поиском»: с помощью ключевых слов подберите похожие вопросы и ответы в категории Информатика. Ответ, полностью соответствующий критериям вашего поиска, можно найти с помощью простого интерфейса: нажмите кнопку вверху страницы и сформулируйте вопрос иначе. Обратите внимание на варианты ответов других пользователей, которые можно не только просмотреть, но и прокомментировать.
Var i, b, c : integer ;
begin
for i : = 1 to 10 do begin
readln(b) ;
if (b> ; 10) and (b< ; 15) then c : = c + b ;
end ;
writeln(c) ;
end.