Информатика, опубликовано 2018-08-22 22:00:04 by Гость
Напечатать все двузначные числа сумма которых равна 12(Делать через турбо паскаль)
Ответ оставил Гость
Program random;
var
mo, my:shortint;
begin
mo:=-10;
my:=22;
while (mo+my=12) and (mywriteln(mo, + ,my, = 12);
mo:=mo-1;
my:=my+1;
end;
end.
Не нашли ответа?
Если вы не нашли ответа на свой вопрос, или сомневаетесь в его правильности, то можете воспользоваться формой ниже и уточнить решение. Или воспользуйтесь формой поиска и найдите похожие ответы по предмету Информатика.