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

Question

Информатика

Марго

2 января, 10:47

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

+2

Ответы (1)

Знаете ответ?

Марина · Answer 1

uses crt;

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

i, max:integer;

begin

clrscr;

for i:=1 to 5 do

begin

readln (a[i]) ;

max:=0;

if (a[i] div 100>0) and

(a[i] mod 10=0) and (a[i]>max)

then max:=a[i];

end;

writeln ('max=', max) ;

end.