Размещено 6 лет назад по предмету
Информатика
от VeideRR
дано трехзначное число. Вычислить сумму больших цифр этого числа.
На паскале. У меня есть одна мысль, но так и не могу понять, где ошибка.
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 (x>y) then if (y>z) then a:=x+y else a:=x+z else if (x>z) then a:=x+y else a:=y+z;
writeln(a);