В последовательности из 15 целых чисел найти максимальный элемент из четных.Помо...

October 2021 1 21 Report

В последовательности из 15 целых чисел найти максимальный элемент из четных.
Помогите пожалуйста написать программу)

Answers & Comments

Б0Г В цикле проверяете (a mod 2) равно ли нулю, то бишь равен ли нулю остаток. Если да - число четное. одновременно с этим первое четное число кладете в переменную max, а остальные четные сравниваете с этой переменной, если какое-то число больше - его кладете в переменную max. Ясно? Если нет, могу написать программу, но лучше чтобы вам было ясно

UPD: можно через массивы, но это не хардкорно

a, max, counter : integer;
begin
max := 0;
for counter = 1 To 15 Do
begin
writeln("Write ur number:");
readln(a);
if (a mod 2) = 0 then
if a > max then max := a;
end;
writeln(max);
readln();
end.

–––––––––––––––––––––––––––––––––––
Вам помог Б-г

2 votes Thanks 1

Valeria13021 Напишите пожалуйста программу)

Valeria13021 Спасибо большое, вы просто гений)))

Answers & Comments

pomogite sdelat esse po anglijskomu yazyku po teme modern teenagers differ fr

najti pervoe chislo fibonachchi bolshe m mgt1pomogite napisat programmu i v n

v pryamougolnoj matrice celyh chisel poschitat kolichestvo nulej summu otricatel

postavte infinitivy v past indefinite ili past continuous 1 andrew to write

l a002 b001 v02 g20

sreda nejtralnaya v rastvore soli 1nicl2 2rbcl 3na2so3 4nano3 obyasnite kak

zamenite infinitivy glagolami v present perfect present in definite present co

ispolzuya slova i slovosochetaniya dannye v skobkah obrazujte alternativnye vop

bicl3br2koh kbio3kbr pomogite rasstavit koefficienty v okislitelno v

zadajte razdelitelnye voprosy k sleduyushim predlozheniyam i zapishite ih 1 my fat5726f492195995e5917027ae3cd6a571 8561

рекомендуемые вопросы

Helpful Links

Helpful Social