Сколько существуют двузначных чисел сумма цифр которых = 7 .Запишите на языке программирования
Сколько существуют двузначных чисел сумма цифр которых = 7 .Запишите на языке программирования
Гость
Ответ(ы) на вопрос:
ГостьИздеваться изволите? Сварите вашего учителя заживо (это не призыв к насилию, а едкое замечание!), если он предлагает такие задачи. Pascal: var i, n: integer; begin n:=0; for i:=10 to 99 do if ((i mod 10)+(i div 10)=7) then inc(n); writeln('Otvet: ',n, 'number(s)'); readln end.
Гостьvar n,i,i1,i2:integer;
Begin
for i:= 10 to 99 do Begin
i1:=i div 10;
i2:=i mod 10;
if (i1+i2=7)then n:=n+1;
end;
writeln(n);
End.
Не нашли ответ?
Похожие вопросы