Question

Как изменилась бы абсолютная высота горы Джомолунгма (Эверест), если бы уровень Мирового океана: а) повысился на 10 м; б) понизился на 12 м?

Answer 1

Var b,a1,a2,S:integer;
Begin
readln(b); {вводим 2-ух значное число}
a1:=b div 10;
a2:=b mod 10;
S:=a1+a2;
if s mod 6=0 then writeln('Кратно') else writeln('не кратно');
readln;
end.