Предмет: Информатика,
автор: SklMatt
Паскаль, команды div и mod
Определить сумму крайних цифр трехзначного числа, введенного с клавиатуры.
Ответы
Автор ответа:
1
Ответ:
program z;
var a: integer;
begin
read (a);
write (a div 100 + a mod 10);
end.
Объяснение:
вводить трехзначное число
SklMatt:
а можно как в предыдущий раз, где было чуть побольше текста
var A, a1, a3, s: integer;
Begin
Write('Задайте 3-хзначное число: ');
Readln (A);
a1:=A div 100;
a3:=A mod 10;
s:=a1+a3;
Writeln ('Число ',A, ' сумма крайних цифр: ', s);
End.
Похожие вопросы
Предмет: Русский язык,
автор: Аноним
Предмет: Русский язык,
автор: 13071969
Предмет: Қазақ тiлi,
автор: janel4
Предмет: Химия,
автор: Mopcik11Popcik
Предмет: Информатика,
автор: ksuxaKes