ПаскальПомогите, пожалуйста, с номером 4, 11 и 16
Паскаль
Помогите, пожалуйста, с номером 4, 11 и 16
Гость
Ответ(ы) на вопрос:
ГостьНу если все в паскале то там должна быть примерно такая прога
номер 4
begin
repeat
a>0
until
a=abs(a)
end
попробуй так
11
begin
if a<0 then
write ('a');
else
end
А вот с последнимм попробуй аналоичное действе сделать
Не нашли ответ?
Похожие вопросы