Написать программу для определения количества и суммы только положительных чисел из 3, введенных с клавиатуры?

Nakieveldar 16 авг. 2021 г., 07:05:13

Var a : array[1.

3] of integer ;

i, sum, col : integer ;

begin

sum : = 0 ;

col : = 0 ;

for i : = 1 to 3 do readln(a[i]) ;

for i : = 1 to 3 do

if a[i]>0 then

begin

col : = col + 1 ;

sum : = sum + a[i] ;

end ;

writeln('Сумма : ', sum) ;

writeln('Кол - во : ', col) ;

end.

Nastia321 15 авг. 2021 г., 03:55:20 | 5 - 9 классы

Написать программу для определения количества и суммы только положительных чисел из 3, введенных с клавиатуры, на pascal?

Написать программу для определения количества и суммы только положительных чисел из 3, введенных с клавиатуры, на pascal.

0992448003 12 мая 2021 г., 04:54:40 | 5 - 9 классы

Составить программу?

Составить программу!

На языке Паскаль

Подсчитать количество отрицательных чисел из 10 введенных с клавиатуры.

Найти количество чисел, не больше 100.

17alinaivanova1 13 июл. 2021 г., 08:37:22 | 5 - 9 классы

Написать программу, которая выводит сумму положительных и кратных трем чисел из вводимой с клавиатуры последовательности из 47 чисел?

Написать программу, которая выводит сумму положительных и кратных трем чисел из вводимой с клавиатуры последовательности из 47 чисел.

Igoryn2815 16 авг. 2021 г., 22:18:08 | 5 - 9 классы

Написать программу решения задачи : Вводить целые числа с клавиатуры, пока не будет введен ноль?

Написать программу решения задачи : Вводить целые числа с клавиатуры, пока не будет введен ноль.

А) Найти сумму введенных чисел.

B) Найти количество четных отрицательных чисел среди введенных.

C) Найти максимальное число среди введенных.

Тим76 25 мая 2021 г., 08:52:16 | 10 - 11 классы

С клавиатуры вводится n целых чисел, несколько положительный и несколько отрицательных, найти сумму положительных?

С клавиатуры вводится n целых чисел, несколько положительный и несколько отрицательных, найти сумму положительных.

(паскаль) Помогите написать программу.

Dailed 11 авг. 2021 г., 13:12:15 | 5 - 9 классы

Составе программу, которая из трех чисел, введенных с клавиатуры, возводит в квадрат положительные, а отрицательные оставляет без изменения?

Составе программу, которая из трех чисел, введенных с клавиатуры, возводит в квадрат положительные, а отрицательные оставляет без изменения.

Алексей1999 28 янв. 2021 г., 23:21:12 | 10 - 11 классы

Найти сумму чисел введенных с клавиатуры количество чисел задать через оператор read?

Найти сумму чисел введенных с клавиатуры количество чисел задать через оператор read.

Паскаль, срочноо.

СуперПупер 28 июн. 2021 г., 17:30:10 | 5 - 9 классы

Помогите написать программы?

Помогите написать программы.

Задача 1

Напишите программу, умеющую проверить положительное ли число, введённое с клавиатуры

Задача 2

Напишите программу в которой из двух введенных с клавиатуры чисел, большее из них выведется на экран

Задача 3

Напишите программу которая при вводе пяти чисел вычисляла бы их сумму и произведение, и выводила на экран, что из этого больше.

SportLife 26 апр. 2021 г., 22:14:15 | 5 - 9 классы

Написать программу для определения суммы натуральных чисел от 1 до n (n - вводится с клавиатуры)?

Написать программу для определения суммы натуральных чисел от 1 до n (n - вводится с клавиатуры).

Naruto2002217 17 авг. 2021 г., 21:03:03 | студенческий

Написать программу которая выводит минимальный элемент введенного с клавиатуры массива целых чисел С + +?

Написать программу которая выводит минимальный элемент введенного с клавиатуры массива целых чисел С + +.