дано трехзначное число. Вычислить сумму больших цифр этого числа.На паскале. У

Дано трехзначное число. Вычислить сумму великих цифр этого числа.
На паскале. У меня есть одна мысль, но так и не могу понять, где ошибка.

program work;
var x,y,z,a:integer;
begin
writeln('введи трехзначное число');
readln(a);
x:=a div 100;
y:=a div 10 mod 100;
z:=a mod 10;
if (xgt;y) then if (ygt;z) then a:=x+y else a:=x+z else if (xgt;z) then a:=x+y else a:=y+z;
writeln(a);

end.


ПОМОГИТЕ ПОЖАЛУЙСТА!!!!!

Чехаренко Анна 2019-09-27 17:22:04

Ошибка тут: y:=a div 10 mod 100;

Стефания Фомин-Агеева 2019-09-27 17:29:26

Да, спасибо, я вчера ещё раз пересмотрел, и увидел. НО все рано спасибо!!! Не размышлял, что кто нибудь отзовется, но для вас - спасибо!!!