Люди очень срочно решите пожалуйста задачу ** Паскале: их 4 штуки! 1.дан массив тз N...

0 голосов
49 просмотров

Люди очень срочно решите пожалуйста задачу на Паскале:
их 4 штуки!
1.дан массив тз N элементов. Есть ли в нем чётные элементы, которые кратны заданному числу K.
2. Дан массив из Nэлементов. Посчитать, сколько элементов массива равных минемальному.
3. Сформировать массив из Nэлементов: 10 12 16 22 30 40.
4. Дан массив из Nэлементов. Перемножить минемальные элементы на 2.
Heeelp!


спросил от (24 баллов) в категории Информатика
оставил комментарий от (24 баллов)

хххххахахаха конеш чё!!! Я прям хочу засветиться на весь инет!!!!

оставил комментарий от (18 баллов)

у меня ангийский и

оставил комментарий от (18 баллов)

чото там

оставил комментарий от (18 баллов)

аа

оставил комментарий от (18 баллов)

история

оставил комментарий от (24 баллов)

азаззазазаз лол у меня по англу 4, а по истории 5

оставил комментарий от (18 баллов)

у тебя по скольким предметам

оставил комментарий от (24 баллов)

возможно по 2-м

оставил комментарий от (18 баллов)

алгебра геометрия?\

оставил комментарий от (24 баллов)

нет:>

2 Ответы

0 голосов
ответил от Начинающий (514 баллов)

1)
const n=100000;
var
k:integer;
flag:boolean;
a:array[1..n]of integer;
begin
flag:=false;
randomize;
read(k);
for i:=1 to n do
begin
a[i]:=random(1000);
if (a[i] mod k=0) and (i mod 2=0) then flag:=true;
end;
if flag then write('Есть') else write('Нет");
end.

оставил комментарий от (24 баллов)

Спасибо большое, я извеняюсь за назойлевость, но можешь лт ты решить или хотябы попробывать решить остальные?:)

оставил комментарий от Начинающий (514 баллов)

ну если честно тут все задачи решаемые и они очень легкие

оставил комментарий от (24 баллов)

Извеняюсь, но я "даун"XD

оставил комментарий от (18 баллов)

я тож

0 голосов
ответил от (18 баллов)

Приветик!!!!!!!!!!!!!!!!!!!

оставил комментарий от (24 баллов)

Норма, сивдим в одном кабинете и отправляем друг другу сообщения!!!!XD

оставил комментарий от (18 баллов)

ну писздец(

...