Задача по информатике в паскаль известно следующее свойств целых чисел если число будучи разделено на 9 даст в остатке 1 или 8 то квадрат этого числа деленный на 9 даст 1.

Question

nektolukas

4 года назад

11

Задача по информатике в паскаль известно следующее свойств целых чисел если число будучи разделено на 9 даст в остатке 1 или 8 то квадрат этого числа деленный на 9 даст 1.

решите в виде паскаль

Знания

Информатика

1 ответ:

Ромарио7791 [18] · Answer 1 · 2020-04-17T16:02:48+03:00

Не совсем понял условие, но попытался сделать

Program ex1;uses crt;var x:integer;begin write('Введите число : '); readln(x); if (x mod 9 = 1) or (x mod 9 = 8) then writeln('Остаток числа ',x,' от деления на 9 : ',sqr(x) mod 9) else writeln('Число не подходит!');end.