С3 по 6, на дом по информатике (паскаль)

По подробнее можно? !

ответ: у тебя не правильное .в начале нужно найти максимальное число не оканч.на 3 , а потом вывести макс. число оканчивающееся на 3.ты разберись. но если ты шаришь в икт и просто не знаешь , как задать условие ,то там нужно через целые и кратные (div/mod) в твоем случае будет как-то так

if a mod 10=3 and a> max then max: =a

ну если ты ленивая жо#а то вот:

var a,b,k,max: integer;

begin

writeln('введите количество чисел > > n ');

readln(n);

max: =0;

for k: = 1 to n do;

begin

writeln('введите числа > > a ');

readln(a);

if (a mod 10=3) and (a> max) then max: =a

end;

writeln('самое больше число оканчивающееся на 3 -',max)

end.

в полной правильности я не уверен(т.к у меня нету паскаля),проверь компилятором

ответ:

1: будьте вежливы,2не забывайте про обязательные формулы , прощания, обращения, выражения   3: избегайте пустословия, и старайтесь не тратить время собеседника понапрасну. 4: вычитывайте и редактируйте свои сообщения и электронные письма перед отправкой, не отправляйте собеседнику бессмыслицу или безграмотный текст. 5: не опускайтесь до грубых оскорблений. вежливость уместна даже тогда, когда ваш оппонент оказывается откровенным хамом. 6: не отказывайте в , вы можете советом, отправить ссылку на нужный ресурс, ответить на вопрос, дать консультацию. 7: не пытайтесь поучать собеседника

8:

будьте снисходительны к ошибкам других, на невольные огрехи в фразах вполне можно закрыть глаза

объяснение:

гы