Информатика | 5 - 9 классы
Помогите, пожалуйста, написать программы!
Очень нужно!
Язык - паскаль!
1) вычислить количество введенных с клавиатуры чисел.
Окончанием служит ввод значения x.
2) вывести максимальное из чисел, вводимых с клавиатуры.
Окончанием служит ввод значения x.
3) вывести произведение 20 чисел вводимых с клавиатуры.
4) вычислить произведение чисел, вводимых с клавиатуры.
Окончанием служит ввод значения x.
Найдите произведение трёх чисел вводимых с клавиатуры при условии , что они больше заданного числа ( найти по программе паскаль )?
Найдите произведение трёх чисел вводимых с клавиатуры при условии , что они больше заданного числа ( найти по программе паскаль ).
Написать программу для решения следующей задачи : Имеется массив чисел, вводимый с клавиатуры?
Написать программу для решения следующей задачи : Имеется массив чисел, вводимый с клавиатуры.
Вычислить сумму и произведение всех чисел массива.
Результаты вывести на экран.
Язык c + + .
Спасибо.
Составить программу для последовательного произведения вводимых с клавиатур целых чисел?
Составить программу для последовательного произведения вводимых с клавиатур целых чисел.
Предусмотреть выход из произведения при вводе нуля.
Написать программу : c клавиатуры последовательно вводятся числа, пока не введут 0?
Написать программу : c клавиатуры последовательно вводятся числа, пока не введут 0.
Вывести на экран количество положительных и отрицательных чисел, введенных с клавиатуры.
Найдите сумму и произведение трех чисел, вводимых с клавиатуры?
Найдите сумму и произведение трех чисел, вводимых с клавиатуры.
С клавиатуры вводится 10 произвольных чисел?
С клавиатуры вводится 10 произвольных чисел.
Составить блок - схему и программу определения суммы всех вводимых чисел.
Написать программу на Паскале : "найти номер первого максимального элемента во вводимой с клавиатуры последовательности чисел?
Написать программу на Паскале : "найти номер первого максимального элемента во вводимой с клавиатуры последовательности чисел.
Условие окончания ввода – ввод числа 0.
".
Написать программу, которая подсчитывает количество чисел, оканчивающихся на 6, введенных с клавиатуры?
Написать программу, которая подсчитывает количество чисел, оканчивающихся на 6, введенных с клавиатуры.
Сигналом окончания ввода является ввод нуля.
Составить программу, которая вычисляет сумму вводимых с клавиатуры целых чисел до ввода отрицательного числа и выводит на экран значение вычисленной суммы?
Составить программу, которая вычисляет сумму вводимых с клавиатуры целых чисел до ввода отрицательного числа и выводит на экран значение вычисленной суммы.
1. Составить программу нахождения скорости пешехода, если расстояние и время прохождения вводятся с клавиатуры?
1. Составить программу нахождения скорости пешехода, если расстояние и время прохождения вводятся с клавиатуры.
2. Составить программу нахождения значения выражения : у = х2 + 8х, если значение х вводится с клавиатуры.
3. Составить программу нахождения значения выражения : к = 2х3 - 5х2 + х - 6, если значение х вводится с клавиатуры.
4. Составить программу нахождения ширины прямоугольника, если площадь и длина вводятся с клавиатуры.
5. Составить программу нахождения основания равнобедренного треугольника, если боковая сторона и периметр вводятся с клавиатуры.
6. Составить программу нахождения боковой стороны равнобедренного треугольника, если основание и периметр вводятся с клавиатуры.
7. Составить программу нахождения средней численности учащихся в трех классах, если количество учеников в каждом классе вводится с клавиатуры.
8. Составить программу нахождения суммы и разности двух чисел вводимых с клавиатуры.
9. Составить программу нахождения произведения и частного двух чисел вводимых с клавиатуры.
Вопрос Помогите, пожалуйста, написать программы?, расположенный на этой странице сайта, относится к категории Информатика и соответствует программе для 5 - 9 классов. Если ответ не удовлетворяет в полной мере, найдите с помощью автоматического поиска похожие вопросы, из этой же категории, или сформулируйте вопрос по-своему. Для этого ключевые фразы введите в строку поиска, нажав на кнопку, расположенную вверху страницы. Воспользуйтесь также подсказками посетителей, оставившими комментарии под вопросом.
1) Program n1 ;
Var a, n : integer ;
BEGIN
repeat
readln (a) ;
n : = n + 1 ;
until a = 0 ; / если брать окончание ввода за 0
END.
2) Program n2 ;
Var a, max : integer ;
BEGIN
repeat
readln (a) ;
if (a>max) then max : = a ; / находим макс.
Число
until a = 0 ;
writeln (max) ;
END.
3) Program n3 ;
Var a, b, n : integer ;
BEGIN
b : = 1 ;
repeat
readln (a) ;
b : = b * a ;
n : = n + 1 ;
until n = 20 ;
writeln(b) ;
END.