Дано двузначное число (водится с клавиатуры). Написать программу определения: превышает ли сумма его цифр третье число, которое вводится с клавиатуры. паскаль
Есть первое число и третье. Значит есть и второе? А оно куда?
получается вводим число (получается по счету 3) и 1 2 число это десятки и единицы 3числа как то так
Не получается. Первое - это то, ИЗ КОТОРОГО получаем цифры единиц и десятков.
begin
Var a,b,s,k : integer;begink := 0;s := 0;readln (a);while a > 0 do begink := a mod 10;s:= s + k;a := a div 10;readln (b);if (s > b) thenwriteln ('Превышает');if (s < b) thenwriteln ('Не превышает');end;end.
спасибо)получается все числа не превышают?какое бы не вводили 2значное число?