Среди преподавателей высших учебных заведений Ливии ливийцы составляют 20-30% от общего числа, остальные - иностранцы

Tomi1234 Tomi1234    3   17.04.2019 06:50    2

Ответы
alinaozhiganova alinaozhiganova  06.06.2020 12:13

Program Pr1;
uses crt;
const n=10000;
var mas:array[1..n] of integer;
i,l:integer;
Begin
clrscr;
for i:=1 to n do mas[i]:=i;
l:=0;
for i:=1 to n do if (mas[i] mod 13<>0) and (mas[i] mod 17<>0) then l:=l+1;
writeln(l);
end.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Другие предметы