Program sum;
Var i, k:integer;
Begin
k:=0;
for i:=10 to 99 do
k:=k+i;
writeln('Summa=',k);
End.
Файлы формата zip открываются архиваторами. Такими как 7-zip, WinRAR, WinZIP, и т.д.
Если же вас просят ввести пароль, а вы его не знаете то можно воспользоваться программами для подбора пароля, но это может занимать длительное время.
Держи ту первые задания фото прилагаю.
1703 г.
read(god);
while god <> 1703 do begin
write ('Неправильно!');
read(god);
end;
write('Правильно');
pascal