ответ: у тебя не правильное .в начале нужно найти максимальное число не оканч.на 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. 1. количество чисел в базисе
2. 2. значение каждой цифры зависит от ее позиции в числе
3. 1. первичная
4. 2. 0-7
5. 3. 1111
6. 3. шиной
7. 4. на машинном языке (в двоичном коде).
8. 5. тактовой частоты процессора.
9. 6. быстродействие, объем памяти, разрядность.
10. 5. Совокупность проводящих каналов для передачи сигналов между микропроцессором и аппаратными устройствами.
11. 4. регистром;
12. 2. АЛУ, УУ, ОП, сопроцессор;
13. 2. Производит арифметические и логические действия над операндами;
Объяснение:
