Question

Петя Васечкин хочет выяснить, делится ли на 7 натуральное число, состоящее не более чем из 60 цифр. Требуется написать программу, которая выполняетжелание Пети и находит остаток от деления введённого числа на 7.
Примеры:
Исходное число 14 Остаток 0
Исходное число 101 Остаток 3

Answer 1

var
 n:integer;

begin
 readln(n);
 writeln('Исходное число ',n,' Остаток ',n mod 7);
end.

Answer 2

Program zz;
var c,a:integer;
begin
readln(a);
c:=a mod 7;
writeln(c);
end.