Вычислите сумму всех элементов массива,исключая элементы кратные 5.на языке паскаль.

Показать ответ

Ответ:

PolinaSlesareva

05.10.2020 21:14

Program n1;
var a: array[1..10] of integer;
i: integer;
sum: real;
begin
randomize;
sum:=0;
for i:=1 to 10 do begin
a[i]:=random(21)-10;
write(a[i],' ');
if a[i] mod 5<>0 then sum:=sum+a[i];
end;
writeln;
write(sum);
end.

0,0(0 оценок)

Популярные вопросы: Информатика

vika26vf

25.07.2020 17:41

Вася очень любит числовые палиндромы и хотел бы их использовать в качестве пароля для передачи зашифрованного сообщения своему другу Пете. Так как 9 любимое число Пети, сколько...

neganov

02.07.2022 13:01

1. Написать программу. Дано трехзначное число, определить является ли сумма его цифр кратна числу х (х - любое число, которое введет пользователь). Пример: введите трехзначное...

холера678

31.08.2021 23:52

ИНФОРМАТИКА!На вход программы поступает неизвестное количество целых чисел, ввод заканчивается нулём. Найти среднее арифметическое всех двузначных чисел, которые делятся на 7....

макспростомакс1

26.01.2021 06:25

О каком информационном процессе говорится в документе? Текст из документа: С электронной почты можно отправлять письма....

alinatrocenko

05.05.2022 01:36

Задана матрица порядка n и число k. найти минимальный элемент i-ой строки матрицы умножить его на каждый элемент матрицы. Значения i, k вводить с клавиатуры. Произведения минимального...

anastasiaplotni

17.06.2022 17:11

Решить по информатике с клавиатуры последовательно вводят целые числа и высчитывается их сумма если с клавиатуры вводят 0, то больше числа не вводят. найти сумму всех введеных...

Блиллиант2812

22.05.2021 04:55

Решить кроссворд. 1) наименьший элемент текста (6 букв) 2)последовательность символов, которая оканчивается символом возврат каретки (5 букв) 3) стандартный компонент среды текстового...

kdominsk71

22.05.2021 04:55

Алг нач цел s, k s: =0 нц для k от 6 до 12 s: =s+5 кц вывод s кон...

alexeypimkin

11.10.2022 12:40

8. В языке запросов поискового сервера для обозначения логической операции «ИЛИ» используется символ «I», а для логической опера- ции «И» — символ «&». В таблице приведены...

Тохо2004

10.05.2023 14:33

Сделать ! 1)сколько килобайт памяти будет занимать изображение размером 128×480 пикселей,где каждый пиксель кодируется 5 байтами ? 2)скорость печати принтера 12 стр. в минуту ....

Полный доступ

Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку