Program zadacha;vara: array[1..1000] of integer;i,n,kolvo: integer;beginwriteln('vvedite kol-vo elementov massiva');read(n);for i:=1 to n do begina[i]:=random(500);write(a[i]:6);end;writeln();kolvo:=0;for i:=1 to n do beginif (a[i] mod 3 = 0) and (a[i] mod 5 = 0) then begin kolvo:=kolvo+1;write(a[i]:6); end;end;writeln();writeln('kol-vo elementov, kratnih 3, 5 = ', kolvo);end.
Идем от обратного, Нужно получить из 100019 операциями -1 и /7 число 1. 1,2,3) Целочисленно 100019 на 7 не делится. ближайшее число, делимое на 7 это 100016 ( целочисленно делим 100019/7 = 14288, 14288*7=100016). Для этого нужно сделать трижды операцию -1 100019-1-1-1=100016 4) 100016/7 = 14288. 5) 14288 опять не делится. Ближайшее число 14287. 14288-1=14287 6) 14287/7=2041 7,8,9,10) 2041-1-1-1-1=2037 11) 2037/7=291 12,13,14,15) 291-1-1-1-1=287 16) 287/7=41 17,18,19,20,21,22) 41-1-1-1-1-1-1=35 23) 35/7=5 24,25,26,27) 5-1-1-1-1=1
1) статья из газеты2) из-за ошибки журналиста известного журналиста считают умершим3) например, "температура кипящей воды - 100С"4) соответственно, "кипящая вода очень горячая"5) "скорый поезд из Новосибирска прибыл на Курский вокзал в 02.35 20 февраля 2010 года"6) "поезд приехал в Москву 20 числа"7) учебник 7 класса по математике для семиклассника8) учебник 7 класса по математике для первоклассника9) текст на русском языке для русскоговорящего человека10) иноязычный сленг для человека, не говорящего на этом языке
