Fedorovna
?>

Введите код создания веб-страницы ниже с текстом, написанным белым цветом начерном фоне​

Информатика

Ответы

Алексей Ксения

ответ: у тебя не правильное .в начале нужно найти максимальное число не оканч.на 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.

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

Ответить на вопрос

Поделитесь своими знаниями, ответьте на вопрос:

Введите код создания веб-страницы ниже с текстом, написанным белым цветом начерном фоне​
Ваше имя (никнейм)*
Email*
Комментарий*

Популярные вопросы в разделе

langprint
ivanova229
denchiklo2299667
Alekseevich_Elena
Kalugin Vyacheslavovna605
Егорова
mistersoshnev354
ВадимСмирнов116
katcoffe3
borvalmok432
Екатерина1979
Виктория1690
superniki87
Dmitriy2211104
dlydesertov1