program abc; uses crt;
var F,k,q1,q2,r:integer;
begin
clrser;
writeln ('введите F');
read ('F');
writeln (('F=',k*((abc(q1)*abc(q2))/(E*sqr(r)));
readkey;
end. ( здесь пишетВстречено 'end', а ожидался идентификатор
Ответа на этот вопрос пока нет. Попробуйте найти его через форму поиска.
Вас заинтересует
1 год назад
5 лет назад
8 лет назад
8 лет назад