Информатика: Составьте алгоритм истории чтобы решить задачу w9

EvgeshaKhomenco2005

02.07.2020 15:15

Информатика

Есть ответ 👍

Составьте алгоритм истории чтобы решить задачу w9

106

469

Посмотреть ответы 1

Ответы на вопрос:

ВладАхтубинск

Информатика

4,7(65 оценок)

Можно использовать другие команды? например trunc? если да, то вот: var i,j,n: integer; s: real; begin readln(i,j); s: =i/j; n: =i-j*trunc(s); {функция trunc выделяет целую часть} writeln(n); end.если нельзя пользоваться trunc, то вот другое решение: var i,j: integer; s,m: real; beginreadln(i,j); m: =i/j; s: =m; while s> =1 do s: =s-1; m: =m-s; writeln(i-j*m; ); end.