|
Главная | Правила | Регистрация | Дневники | Справка | Пользователи | Календарь | Поиск | Сообщения за день | Все разделы прочитаны |
|
Опции темы | Опции просмотра |
08.11.2011, 15:56 | #1 (permalink) |
Новичок
Регистрация: 08.11.2011
Сообщений: 5
Сказал(а) спасибо: 0
Поблагодарили 0 раз(а) в 0 сообщениях
Репутация: 10
|
Помогите решить задачи
2) Создайте программу выполняющую обработку массивов. На основе исходных массивов A и B с рабочим размером n сформировать массив C, элементы которого вычисляются по формуле: С=A*B. Упорядочить массив С по возрастаю, используя метод выбора. Вывести элементы массива C на экран. Массивы A, B и С являются целочисленными. Значение n и значения элементов массива A и B вводятся с клавиатуры. При этом значение элементов внутри массива А не должны повторяться. Заранее спасибо всем кто поможет с этой задачей. |
08.11.2011, 15:56 | |
Helpmaster
Member
Регистрация: 08.03.2016
Сообщений: 0
|
Так же вы можете найти интересующую вас информацию в аналогичных топиках Помогите решить задачи на C++ Помогите решить задачи на C++ Помогите решить задачи на Паскаль |
08.11.2011, 17:10 | #2 (permalink) |
Member
Регистрация: 15.02.2009
Сообщений: 695
Сказал(а) спасибо: 0
Поблагодарили 0 раз(а) в 0 сообщениях
Репутация: 523
|
Вот первая задачка.
Код:
var n,i,k:integer; begin readln(n); i:=2; k:=0; repeat if (i mod 3)=0 then begin writeln(i); k:=k+1; end; i:=i+2; until k>=n; readln; end. |
08.11.2011, 17:37 | #3 (permalink) |
Member
Регистрация: 15.02.2009
Сообщений: 695
Сказал(а) спасибо: 0
Поблагодарили 0 раз(а) в 0 сообщениях
Репутация: 523
|
А вот 2 задача.
Код:
var a,b,c:array[1..100] of integer; t,i,j,m,n:integer; u:boolean; begin readln(n); writeln('array a'); repeat u:=true; for i:=1 to n do read(a[i]); for i:=1 to n-1 do for j:=i+1 to n do if a[i]=a[j] then begin u:=false; writeln('error in array a, re enter array a'); end; until u; writeln('array b'); for i:=1 to n do read(b[i]); for i:=1 to n do c[i]:=a[i]*b[i]; writeln('array c'); for i:=1 to n do write(c[i],' '); writeln; for i:=1 to n-1 do begin m:=i; t:=c[i]; for j:=i+1 to n do if t>c[j] then begin m:=j; t:=c[j]; end; c[m]:=c[i]; c[i]:=t; end; writeln('array c'); for i:=1 to n do write(c[i],' '); readln; end. |
08.11.2011, 17:40 | #5 (permalink) |
Member
Регистрация: 15.02.2009
Сообщений: 695
Сказал(а) спасибо: 0
Поблагодарили 0 раз(а) в 0 сообщениях
Репутация: 523
|
Ой, извини. Это я очень не внимателен, был уверен, что необходимо на Паскале.
Могу попробывать переделать в С++, но это займёт некоторое время. |
Ads | |
Member
Регистрация: 31.10.2006
Сообщений: 40200
Записей в дневнике: 0
Сказал(а) спасибо: 0
Поблагодарили 0 раз(а) в 0 сообщениях
Репутация: 55070
|
08.11.2011, 18:27 | #7 (permalink) |
Member
Регистрация: 15.02.2009
Сообщений: 695
Сказал(а) спасибо: 0
Поблагодарили 0 раз(а) в 0 сообщениях
Репутация: 523
|
Вот 1 задача на С++
Код:
#include<iostream.h> int main() { int n,i,k; cin >> n; i=2; k=0; while (k<=n) { if (i%3==0) { cout << i ; cout << "\n" ; k=k+1; } i=i+2; } return 0; } |
08.11.2011, 19:01 | #8 (permalink) |
Member
Регистрация: 15.02.2009
Сообщений: 695
Сказал(а) спасибо: 0
Поблагодарили 0 раз(а) в 0 сообщениях
Репутация: 523
|
Вот 2 задача на С++
Код:
#include<iostream.h> int main() { int a[100],b[100],c[100]; int t,i,j,m,n; bool u; cin >> n; cout << "array a \n"; u=true; while (u) { u=false; for (i=1;i<=n;i++) cin >> a[i]; for (i=1;i<=n-1;i++) for (j=i+1;j<=n;j++) if (a[i]==a[j]) { u=true; cout << "error in array a, re enter array a \n"; } } cout << "array b \n"; for (i=1;i<=n;i++) cin >> b[i]; for (i=1;i<=n;i++) c[i]=a[i]*b[i]; cout << "array c \n"; for(i=1;i<=n;i++) { cout << c[i] << " "; } cout << "\n"; for (i=1;i<=n-1;i++) { m=i; t=c[i]; for (j=i+1;j<=n;j++) { if (t>c[j]) { m=j; t=c[j]; } c[m]=c[i]; c[i]=t; } } cout << "array c \n"; for(i=1;i<=n;i++) { cout << c[i] << " "; } return 0; } |
08.11.2011, 19:14 | #9 (permalink) |
Новичок
Регистрация: 08.11.2011
Сообщений: 5
Сказал(а) спасибо: 0
Поблагодарили 0 раз(а) в 0 сообщениях
Репутация: 10
|
спасибо тебе всё работает
|
Ads | |
Member
Регистрация: 31.10.2006
Сообщений: 40200
Записей в дневнике: 0
Сказал(а) спасибо: 0
Поблагодарили 0 раз(а) в 0 сообщениях
Репутация: 55070
|
Опции темы | |
Опции просмотра | |
|
|