задача: Дан массив A состоящий из 10 элементов,заполнить его случайными числами и найти сумму элементов. решите задачу
10-11 класс
|
несколькими спосабами
var
i,a,b:integer;
x: array[1..15] of integer;
begin
a:=0;
b:=0;
for i:=1 to 15 do
begin
begin
x[i]:=random(15);
write(x[i]:4);
end;
if (x[i]>=0)and(x[i] mod 3=0) then
b:=b+1;
end;
writeln;
writeln;
for i:=1 to 10 do
begin
a:=a+x[i];
end;
write('суммa = ',a);
end.
--{
program zadacha (input, output) ; (ввод-вывод элементов массива}
var
a: array [1..10] of integer;
i: integer;
begin
randomize;
for i:=1 to 10 do
begin
a[i]:=random(30) ;
writeln ('A(' I, ')=', a[i])
end
end.
}--
Другие вопросы из категории
одном доме, даже в одном подъезде живут учителя Климов, Михеенко, Ушаков,
Жебин. Один из них учитель математики, другой – информатики, третий –
рисования, а четвертый – музыки. Известно, что: ни Климов, ни Ушаков не умеют
играть ни на одном музыкальном инструменте; Ушаков не знаком с Климовым;
учителя рисования и информатики в воскресенье уезжают на дачу к Михеенко; Жебин
попросил учителя рисования написать картины с его изображением и изображением
Климова. Отметь вариант, в котором верно указано, кто есть кто.
Читайте также
ими способами,вкратце обьяснить что вы написали чтобы понятно было)
Дан одномерный массив А состоящий из 10 элементов.Вывести на экран исходную таблицу и резултат программы.
Найти произведения элементов массива А. удовлетворяющих условию:
c<=A[i]<=d.
-Удвоенную сумму положительных элементов;
-Удалить все четные элементы массива.
ПОМОГИТЕ СРОЧНО!!!
2.Вывести на экран 10 строк, содержащие символ *, причем количество * в каждой строке должно быть равно номеру строки.
3.Пользователем вводится 2 целых числа. Вывести на экран сумму положительных четных чисел, находящихся в границах диапазона, указанного пользователем.
4. В результате работы программы формируется массив, состоящий из 10 элементов и заполненный случайными числами от 0 до 100. Вывести на экран этот же массив в порядке возрастания.
5.Вводится строка, содержащая буквы и цифры разного регистра (т.е. строчные и прописные буквы). В результате работы программы на экран выводится строка следующего вида: цифры в порядке возрастания, строчные буквы по алфавиту, прописные буквы по алфавиту.