{26)	(А. Куканова) Рассматривается множество целых чисел, принадлежащих 
числовому отрезку [3394; 8599], которые удовлетворяют следующим условиям:
− остаток от деления на 3 равен 1;
− остаток от деления на 7 равен 5.
Найдите наибольшее из таких чисел и их сумму. }
program tt;
var
i, s, maxi: longint;
begin
maxi:=0;
s:=0;
for i:=3394 to 8599 do
if ( i mod 3=1) and (i mod 7=5) then begin
s:=s+i;
if i>maxi then maxi:=i;
end;
writeln(maxi,' ',s);
end.

ezI2KQko0JAuINCa0YPQutCw0L3QvtCy0LApINCg0LDRgdGB0LzQsNGC0YDQuNCy0LDQtdGC0YHRjyDQvNC90L7QttC10YHRgtCy0L4g0YbQtdC70YvRhSDRh9C40YHQtdC7LCDQv9GA0LjQvdCw0LTQu9C10LbQsNGJ0LjRhSAK0YfQuNGB0LvQvtCy0L7QvNGDINC+0YLRgNC10LfQutGDIFszMzk0OyA4NTk5XSwg0LrQvtGC0L7RgNGL0LUg0YPQtNC+0LLQu9C10YLQstC+0YDRj9GO0YIg0YHQu9C10LTRg9GO0YnQuNC8INGD0YHQu9C+0LLQuNGP0Lw6CuKIkiDQvtGB0YLQsNGC0L7QuiDQvtGCINC00LXQu9C10L3QuNGPINC90LAgMyDRgNCw0LLQtdC9IDE7CuKIkiDQvtGB0YLQsNGC0L7QuiDQvtGCINC00LXQu9C10L3QuNGPINC90LAgNyDRgNCw0LLQtdC9IDUuCtCd0LDQudC00LjRgtC1INC90LDQuNCx0L7Qu9GM0YjQtdC1INC40Lcg0YLQsNC60LjRhSDRh9C40YHQtdC7INC4INC40YUg0YHRg9C80LzRgy4gfQpwcm9ncmFtIHR0Owp2YXIKaSwgcywgbWF4aTogbG9uZ2ludDsKYmVnaW4KbWF4aTo9MDsKczo9MDsKZm9yIGk6PTMzOTQgdG8gODU5OSBkbwppZiAoIGkgbW9kIDM9MSkgYW5kIChpIG1vZCA3PTUpIHRoZW4gYmVnaW4Kczo9cytpOwppZiBpPm1heGkgdGhlbiBtYXhpOj1pOwplbmQ7CndyaXRlbG4obWF4aSwnICcscyk7CmVuZC4=