Возвести во вторую степень число m/n, если его целая - вопрос №2917734 от анна2246 22.08.2020 07:00

Question

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

анна2246 · Answer

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