Информатика, опубликовано 2018-08-22 23:20:52 by Гость
Помогите!!В Паскале!!Одно число в 2 раза больше другого, а их сумма равна 93. Найти эти числа.
Ответ оставил Гость
var i,j:integer;
begin
for i:=1 to 93 do
for j:=1 to 93 do
begin
if (i=j*2) and (i+j=93) then writeln(Большее число равно ,i, а меньшее равно ,j);
end;
end.
Не нашли ответа?
Если вы не нашли ответа на свой вопрос, или сомневаетесь в его правильности, то можете воспользоваться формой ниже и уточнить решение. Или воспользуйтесь формой поиска и найдите похожие ответы по предмету Информатика.