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

Дан целочисленный массив из 10 элементов.Элементы массива могут принимать целые значения от -50 до 50.Составить программу ,позволяющую найти и

10-11 класс

вывести сумму элементов массива которые кратны 7 и оканчиваются на 5 .Гарантируется,что в исходном массиве есть хотя бы один такой элемент.
НА ЯЗЫКЕ ПАСКАЛЬ!!!!

Tanya46g 17 авг. 2013 г., 22:26:06 (10 лет назад)
Рейтинг
+ 0 -
0 Жалоба
+ 0 -
Serjbegosh
18 авг. 2013 г., 0:45:56 (10 лет назад)

const N=10;
TYPE Chisla = array [1..N] of integer;
var f: Chisla;
procedure IChisla (N: integer; var a: Chisla);
begin  for var i := 1 to N do a[i] := random(-50, 50);
end;
procedure OChisla(N: integer;a: Chisla);
begin 
 for var i := 1 to N do write(a[i]:5);
end;
function Sum (a:Chisla): integer;
begin
for var i:=1 to N do  
  if (a[i] mod 7 = 0) and (a[i] mod 10 = 5) then result:= result+f[i]; 
 end;
BeginI
Chisla (N, f);
OChisla (N, f);
writeln ('Вывести сумму', Sum(f));
End.

Ответить

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

1. Что понимают под информацией?

2. Как вы понимаете, что такое "теория информации"?
3. С каким понятием тесно связано понятие алгоритма?
4. В чем заключается проблема создания искусственного интеллекта?
5. Попробуйте составить алгоритм узнавания кошки.

Определить является ли целая часть числа m/n

четной. Если она четная,
то m возвести в квадрат, иначе n утроить.

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

ПАСКАЛЬ.1)дан целочисленный массив из 30 элементов.элементы массива могут принимать целые значения от 0 до 1000.опишите на русском языке или на одном из

языков программирования алгоритм,позволяющий найти среднее арифметическое нечетных трехзначных чисел,записанных в этом массиве.если ни одного такого числа нет,нужно вывести сообщение об этом.
2)дан целочисленный массив из 30 элементов.элементы массива могут принимать целые значения от 0 до 100.опишите на русском языке или на одном из языков программирования алгоритм,позволяющий найти и вывести произведение элементов массива,которые имеют четное значение и не оканчиваются на 0.

Дан целочисленный массив из 30 элементов. Элементы массива могут принимать целые значения от 0 до 1000. Опишите на русском языке или на одном из языков

программирования алгоритм, позволяющий найти и вывести сумму элементов массива, кратных тринадцати. Гарантируется, что в исходном массиве есть хотя бы один элемент, значение которого делится на тринадцать. Исходные данные объявлены так, как показано ниже. Запрещается использовать переменные, не описанные ниже, но разрешается не использовать часть из них.


const N=30;
var a: array [l..N] of integer;
i,j,s: integer;
begin
for i:=l to N do readln(a[i]);
...
end.

дан целостный массив из 30 элементов. элементы массива могут принимать целые значения от 0 до 100 опишите на русском языке или одном из языков

программирования алгоритм позволяющий найти и вывести номер элемента массива имеющего максимальное значение сре элементов массива которые делятся на 3 и кратны 5

дан целочисленный массив из 20 элементов. Элементы массива могут принимать целые числа от о до 10000 включительно. Опишите на естественном языке или на

одном из языков программирования алгоритм, позволяющий найти и вывести максимальное значение среди трехзначных элементов массива, оканчивающихся на 0

дан целочисленный массив из 20 элементов. Элементы массива могут принимать целые числа от о до 10000 включительно. Опишите на естественном языке или на

одном из языков программирования алгоритм, позволяющий найти и вывести максимальное значение среди трехзначных элементов массива, оканчивающихся на 0



Вы находитесь на странице вопроса "Дан целочисленный массив из 10 элементов.Элементы массива могут принимать целые значения от -50 до 50.Составить программу ,позволяющую найти и", категории "информатика". Данный вопрос относится к разделу "10-11" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.