Перейти к выбору ответа 04.05.2022Помогите, пожалуйста с задачей: Даны два целых числа A и B( A Выбрать другой вопрос Смотреть ответ Перейти к выбору ответа Информатика Ответ учителя по предмету Информатика Var A,B:integer; P:real; Begin P:=1; Write(‘A = ‘);Read(A); Write(‘B = ‘);Read(B); For A:=A to B do P:=P*A; WriteLn(P) End.
Похожие вопросы от пользователей