Регистрация
Deni11111111
05.06.2020 15:45
Информатика
Есть ответ 👍

Напишите программу, которая в последовательности натуральных чисел определяет максимальное число, оканчивающееся на 8. программа получает на вход количество чисел в последовательности, а затем сами числа. в последовательности всегда имеется число, оканчивающееся на 8. количество чисел не превышает 1000. введённые числа не превышают 30 000. программа должна вывести одно число – максимальное число, оканчивающееся на 8.возможно ли это написать в visual basic? если да,то как?

258
290
Посмотреть ответы 2

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

rashantixaip
rashantixaip
4,5(22 оценок)
Cls input a m=0 for i=1 to a input b if (b mod 10=8) and b> m then m=b end if next print m end
Victoria0NK
Victoria0NK
4,5(43 оценок)
Var i,sum: integer; begin sum: =0; for i: =20 to 40 do begin if i mod 3=0 then begin writeln('число: ',i); sum: =sum+i; end; end; writeln('сумма чисел: ',sum); end.

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