Форум программистов, компьютерный форум CyberForum.ru

Перепешите пожайлуста на Dev-C++ Срочненько нужно - C++

Восстановить пароль Регистрация
 
punkreva1
0 / 0 / 0
Регистрация: 28.11.2012
Сообщений: 5
27.12.2012, 13:31     Перепешите пожайлуста на Dev-C++ Срочненько нужно #1
Дано натуральное число N и массивы действительных чисел a[1..n] и [1..m]. Найти сумму тех элементов массива a, которых нету в массиве b.

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
var
   n,m,i,j,sum,k:integer;
   a,b:array [1..10000] of integer;
BEGIN
readln(n,m);
for i:=1 to n do
    begin
    a[i]:=random(20);
    write(a[i]:3);
    end;
writeln;
for i:=1 to m do
    begin
    b[i]:=random(20);
    write(b[i]:3);
    end;
sum:=0;
writeln;
for i:=1 to n do
    begin
    k:=0;
    for j:=1 to n do
        begin
        if a[i]=b[j] then inc(k);
        
        end;
    if k=0 then sum:=sum+a[i];
    end;
writeln(sum);
readln;
END.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
27.12.2012, 13:31     Перепешите пожайлуста на Dev-C++ Срочненько нужно
Посмотрите здесь:

Отпишите пожайлуста. Структуры С++ C++
Доработайте пожайлуста!!! C++
Нужно закрасить графический объект в dev cpp C++
Перепешите за меня с паскаля на C++ C++
C++ Перепешите программу
Какие опции нужно выставить в Dev-C++, чтобы получить минимальный выходной файл? C++
C++ нужно что бы работала в DEV
C++ Посмотрите программу пожайлуста!

Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
После регистрации реклама в сообщениях будет скрыта и будут доступны все возможности форума.
Ответ Создать тему
Опции темы

Текущее время: 08:37. Часовой пояс GMT +3.
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2016, vBulletin Solutions, Inc.
Рейтинг@Mail.ru