Паскаль?

Pashabestru 3 дек. 2020 г., 12:59:36

Const n = 10 ;

var a : array[1.

N] of integer ;

i, s : integer ;

begin

Randomize ;

for i : = 1 to n do

begin

a[i] : = random(90) + 10 ;

write(a[i] : 4) ;

end ;

writeln ;

s : = 0 ;

for i : = 1 to n do if a[i] mod 3 0 then s : = s + a[i] ;

writeln('Сумма тех, которые не делятся на 3 = ', s) ;

end.

Пример : 65 37 24 68 17 56 17 77 34 99

Сумма тех, которые не делятся на 3 = 371.

Оля1234567890dance 11 авг. 2020 г., 12:56:50 | 5 - 9 классы

Даны 3 числа?

Даны 3 числа.

Вывести сумму чётных из них, которые являются двухзначными числами.

(в паскале)помогите срочно надо.

Tema0dilain 14 июн. 2020 г., 05:44:58 | 5 - 9 классы

Паскаль 1?

Паскаль 1.

Дана последовательность N целых чисел, введенных с клавиатуры.

Получить сумму и количество тех членов последовательности, которые :

а) имеют четное значение, четный номер и отрицательные ;

б) делятся на 3 и не делятся на 5 ;

в).

Vladuv 26 янв. 2020 г., 22:30:54 | 5 - 9 классы

В массиве из 30 элементов найти : 1 - номер минимального элемента 2 - количество двухзначных чисел 3 - сумму тех чисел на конце которых ноль, ре шите пожалуйста в в паскале , 3 программы отдельно))сро?

В массиве из 30 элементов найти : 1 - номер минимального элемента 2 - количество двухзначных чисел 3 - сумму тех чисел на конце которых ноль, ре шите пожалуйста в в паскале , 3 программы отдельно))срочно срочно.

Пост1 28 мая 2020 г., 06:34:10 | 10 - 11 классы

Сосчитать сумму и количество двухзначных чисел, кратных 7?

Сосчитать сумму и количество двухзначных чисел, кратных 7.

Язык программирования - Паскаль.

Лерасингх 25 мая 2020 г., 18:55:30 | 5 - 9 классы

Дано четыре вещественных числа найти сумму тех чисел которые больше пяти на Паскаль?

Дано четыре вещественных числа найти сумму тех чисел которые больше пяти на Паскаль.

Maxat2005 3 сент. 2020 г., 21:48:20 | 10 - 11 классы

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

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

В ПАСКАЛЕ!

Пожалуйста!

Svetlanameri 28 нояб. 2020 г., 08:17:45 | 5 - 9 классы

Определите и выведите на экран количество трехзначных чисел, которые делятся одновременно на 3, 5, 7(в паскале авс) РЕБЯЯЯЯТ ОЧЕНЬ НАДО?

Определите и выведите на экран количество трехзначных чисел, которые делятся одновременно на 3, 5, 7(в паскале авс) РЕБЯЯЯЯТ ОЧЕНЬ НАДО!

BUZIMOK 15 июл. 2020 г., 11:37:06 | 10 - 11 классы

В паскале вычислите сумму первых 30 целых чисел, которые делятся на 5 без остатка?

В паскале вычислите сумму первых 30 целых чисел, которые делятся на 5 без остатка.

Privedenie7 2 июл. 2020 г., 15:21:42 | 10 - 11 классы

Помогите решить задачу?

Помогите решить задачу.

Решить через паскаль.

Дан массив В(50) целых чисел.

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

Иванчик1234 13 июл. 2020 г., 19:52:12 | 5 - 9 классы

Паскаль?

Паскаль.

Даны три целых числа.

Определите сумму тех из них, которые не кратны трём.

Можно код?

Очень нужно.