Возвести во вторую степень число m/n, если его целая - вопрос №2917734 от Bake2017 21.06.2021 02:17

Question

Информатика: Возвести во вторую степень число m/n, если его целая часть больше числа k, где k остаток от деления m на 5. нужно сделать через pascal !

Bake2017 · Answer

Vark,m,n:real;beginreadln(m,n);k:=m mod 5;if (m div n) k thenwriteln( (m/n)*(m/n) );end....