Опубликовано 08.06.2017 по предмету Информатика от Гость >> <<

Помогите решить в Паскале.плиз.

Проверьте,делится ли сумма произвольных трех чисел,введенных с клавиатуры,на последнее из них без остатка.

Ответ оставил Гость

uses crt;
var a,b,c,x,y:integer;
begin
write(vvedite 3 4isla);
read(a,b,c);
x:=a mod c;
y:=b mod c;
if (x=0) and (y=0) then
write(delits9)
else
write(ne delits9);
read;
end.