Написати програму яка визначить добуток крайних цифр чотиризначного числа.

anastasiajybajl anastasiajybajl    1   05.06.2019 15:30    0

Ответы
JaikHit533 JaikHit533  01.10.2020 19:49
Var x1,x2,y,p:integer;
begin
write('Введите четырехзначное число: ');
readln(y);
x1:=y div 1000;
x2:=y mod 10;
p:=x1*x2;
writeln('Произведение крайних цифр: ',p) 
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика