ПАСКАЛЬ!
определить и вывести на экран количество натуральных чисел, меньших 1000 делящихся на 5 и 7 одновременно

k:=0 это что и почему?

Это счетчик количества подходящих чисел. Обнуление переменных - хорошая привычка.

обязательно?

В Паскале - нет. В дальнейшем, если будете изучать другие программные среды, например С - это будет очень важно.

спс

var i,k:integer;begink:=0;for i:=1 to 1000 do if ((i mod 5 = 0) and ((i mod 7 = 0)) then k:=k+1;writeln("Количество натуральных чисел до 1000, которые делятся на 5 и 7 без остатка: ",k);end.