Статистика
Всего в нашей базе более 4 327 657 вопросов и 6 445 963 ответов!

Дан массив А из 20 элементов. Найти произведение элементов массива. Результат вывести на печать. на языке бейсика пожалуйста полное решение

1-4 класс

Anny168 12 марта 2015 г., 1:06:25 (9 лет назад)
Рейтинг
+ 0 -
0 Жалоба
+ 0 -
Asiya95
12 марта 2015 г., 3:46:26 (9 лет назад)

незнаю ,но думаю что A надо умножить на 20

+ 0 -
1337pacantre
12 марта 2015 г., 4:53:34 (9 лет назад)

Я дико извиняюсь, но я не знаю бэйсика. Смогу написать только на паскале.

var A:array [1..20] of integer;

       i, s:integer;

begin

 s:=A[1];

for i:=2 to 20 do s:=s*A[i];

writeln(s);

end.

 

 

Попросите кого-нибудь, может он переведет на бейсик

 

Ответить

Другие вопросы из категории

Читайте также

Паскаль

1-Дано : массив целых чисел А[N]. Проверьте , есть ли в нем элементы равные нулю. Если есть, то найдите номер первого из них, те наименьшее i, при котором А[i]=0, иначе выведите сообщение.
2- Из заданной строки выбрать и напечатать все слова начинающиеся с буквы "А".



Вы находитесь на странице вопроса "Дан массив А из 20 элементов. Найти произведение элементов массива. Результат вывести на печать. на языке бейсика пожалуйста полное решение", категории "информатика". Данный вопрос относится к разделу "1-4" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.