Дано натуральное число. верно ли, что сумма его чисел больше k, а само число четное?

ATimofeeva ATimofeeva    3   09.07.2019 16:30    10

Ответы
syav1979 syav1979  02.10.2020 23:33
Program fd;
var a,k:integer;
begin
Writeln('Ввести чётное натуральное число a');
Readln(a);
Writeln('Ввести число k');
Readln(k);
Writeln('',a div 100);
Readln(d);
Writeln('',a mod 100);
Readln(c);
if d+c>k then Write('Утверждение верно!'); else
if d+c<k then Write('Утверждение неверно!'); 
end.
Только для двузначного т.к. не имею на компьютере паскаль
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика