Значение переменной A - трехзначное натуральное число. Результат - двузначное число B, которое получается из числа A, если вычеркнуть среднюю цифру. Написать программу на Паскале для получения числа
More Questions From This User See All
Answers & Comments
program raf105;
var abc,a,b,c: integer;
begin
write('Введите трёхзначное число: ');
readln(abc);
a:= abc div 100;
b:= (abc div 10) mod 10;
c:= abc mod 10;
abc:= a*10 + c;
writeln('Число без средней цифры: ',abc);
end.
PascalABC 3.4.2