Паскаль, команды div и mod
Определить сумму крайних цифр трехзначного числа, введенного с клавиатуры.
Ответы на вопрос
Ответил valgrisa
1
Ответ:
program z;
var a: integer;
begin
read (a);
write (a div 100 + a mod 10);
end.
Объяснение:
вводить трехзначное число
SklMatt:
а можно как в предыдущий раз, где было чуть побольше текста
Program Sanya;
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.
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.
благодарю, просто лучшая
fedorv2006 можете помочь задание сделать?
Новые вопросы