Вывести на экран наибольшее целое число в диапазоне от 0 до введеного, которое делится на 8.

Question

Информатика: Вывести на экран наибольшее целое число в диапазоне от 0 до введеного, которое делится на 8.

Milenadaw · Answer

Var k,i,j:integer;beginread(k);j:=0;for i:=1 to k doif i mod 8=0 then j:=i;if j=0 then writeln( такого нет ) else writeln(j);end....