В Worde:
Клавишей "Enter" в конце строки, чтобы создать новую строку.
Клавишей "Backspace" в конце пустой строки, чтобы удалить строку.
Клавишей "Delete" в начале пустой строки, чтобы удалить строку.
Program data ;
Uses CRT;
var n:integer;
begin
ReadKey;
Writeln('3 июля');
<span>end.</span>
Можешь не благодарить
var
a,n:integer;
begin
readln(a);
while a<>0 do
begin
if (a mod 5=0)or (a mod 7=0)then inc(n);
readln(a);
end;
writeln(n);
end.
Конфигурация - набор компьютера, его составляющие, а ресурсы компъютера - память, то что в ней находится