Информатика, опубликовано 2018-08-22 20:16:57 by Гость
Даны два числа a и b. Проверить кратность их суммы квадратов числу c. (Паскаль)
Ответ оставил Гость
Vara,b,c,d:integer;beginreadln(a);readln(b);readln(c);d:=(a+b)mod sqr(c);if d=0 then beginwriteln (Кратно); end else writeln (Не кратно);end.
Не нашли ответа?
Если вы не нашли ответа на свой вопрос, или сомневаетесь в его правильности, то можете воспользоваться формой ниже и уточнить решение. Или воспользуйтесь формой поиска и найдите похожие ответы по предмету Информатика.