Регистрация
alinaastana2015
02.11.2021 17:17
Информатика
Есть ответ 👍

Когда патч в
когда водка спирит?
когда бабулянтская?

287
339
Посмотреть ответы 1

Ответы на вопрос:

dilayra16
dilayra16
4,5(19 оценок)
Вedit1,2,3 вводишь числа, потом их делешь 2 mod edit и смотришь равно ли это нулю иди нет если не равно тогда подходит, берешь второе число такие действия если оно подходит тогда сравниваешь с первым и смотришь что больше и так с третьем. var n1,n2,n3,max: word; begin if 2 mod strtoint(edit1.text) < > 0 then n1: =strtoint(edit1.text); if 2 mod strtoint(edit2.text) < > 0 then n2: =strtoint(edit2.text); if 2 mod strtoint(edit3.text) < > 0 then n3: =strtoint(edit3.text); if n1> > n2 then max: = n1 else max: =n2; if max< n3 then max: =n3; edit4.text: = inttostr(max); на форме 4 edit и одна кнопка

Популярно: Информатика