Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > IT форум > Помощь студентам
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Закрытая тема
Ваша тема закрыта, почему это могло произойти? Возможно,
Нет наработок или кода, если нужно готовое решение - создайте тему в разделе Фриланс и оплатите работу.
Название темы включает слова - "Помогите", "Нужна помощь", "Срочно", "Пожалуйста".
Название темы слишком короткое или не отражает сути вашего вопроса.
Тема исчерпала себя, помните, один вопрос - одна тема
Прочитайте правила и заново правильно создайте тему.
 
Опции темы Поиск в этой теме
Старый 05.01.2011, 20:24   #1
Юра Кадников
 
Регистрация: 04.01.2011
Сообщений: 8
По умолчанию здесь 4 задачи и как то неполучается их решать нужен сам листинг я в этом дуб

Линейный алгоритм.
Скорость лодки в стоячей воде V км/ч. Скорость течения реки U км/ч.(V<U). Время движения лодки по озеру T1, а по реке(против течения) T2. Определить путь Sпройденной лодки.

Условный оператор.
Значение переменных X,Y,Z поменять местами так, чтобы оказались упорядочённые по возрастанию.

Одномерный массив.
Дано целое число N и набор из N ненулевых целых чисел. Вывести в том же порядке номера всех нечётных чисел из данного набора и кол-во K таких чисел.

Символы и строки.
Дана строка. Подсчитать кол-во содержащих в ней 1(прописных букв) 2 (строчных букв). (это навыбор или такие или такие.
Юра Кадников вне форума
Старый 05.01.2011, 20:28   #2
k0tone
Пользователь
 
Аватар для k0tone
 
Регистрация: 09.11.2010
Сообщений: 99
По умолчанию

Цитата:
Сообщение от Юра Кадников Посмотреть сообщение
Одномерный массив.
Дано целое число N и набор из N ненулевых целых чисел. Вывести в том же порядке номера всех нечётных чисел из данного набора и кол-во K таких чисел.
Код:
program test;
uses crt;
var a:array [1..255] of integer;
    i,k,n:integer;
begin
 clrscr;
 randomize;
 write('Vvedine chislo N=');
 readln(n);
 for i:=1 to n do
  begin
   a[i]:=random(21)-10;
   if a[i]=0 then a[i]:=a[i]+1;
   write(a[i]:5);
  end;
 writeln;
 K:=0;
 for i:=1 to n do
 if a[i] mod 2 <> 0 then
  begin
   K:=K+1;
   write(i:5);
  end;
  writeln;
  writeln('K=',K);
 readln;
end.
Если я вам помог - нажмите на весы пот аватаркой!
k0tone вне форума
Старый 05.01.2011, 21:39   #3
Don Karleone
Форумчанин
 
Регистрация: 05.04.2010
Сообщений: 410
По умолчанию

условный оператор
Код:
if Y > Z then 
                 begin
                    T:=Y;
                    Y:=Z;
                    Z:=T; 
                 end;
if X > Y then 
                 begin
                    T:=X;
                    X:=Y;
                    Y:=T; 
                 end;
if Y > Z then 
                 begin
                    T:=Y;
                    Y:=Z;
                    Z:=T; 
                 end;
ICQ: 593-013-807
Don Karleone вне форума
Старый 05.01.2011, 21:52   #4
Neser
Пользователь
 
Аватар для Neser
 
Регистрация: 26.12.2010
Сообщений: 47
По умолчанию

Цитата:
Сообщение от Юра Кадников Посмотреть сообщение
Условный оператор.
Значение переменных X,Y,Z поменять местами так, чтобы оказались упорядочённые по возрастанию.
Код:
int X = 0;
            int Y = 0;
            int Z = 0;
            int temp = 0;
            Console.WriteLine("Введите Х=");
            X=Convert.ToInt32(Console.ReadLine());
            Console.WriteLine("Введите Y=");
            Y = Convert.ToInt32(Console.ReadLine());
            Console.WriteLine("Введите Z=");
            Z=Convert.ToInt32(Console.ReadLine());
            if (Y < X)
            {
                temp = X;
                X = Y;
                Y = temp;
            } 
            if (Z < X)
            {
                temp = Z;
                Z = X;
                X = temp;
            }
            if (Z < Y)
            {
                temp = Z;
                Z = Y;
                Y = temp;
            }
            Console.WriteLine("{0},{1},{2}",X,Y,Z);
            Console.ReadLine();
KISS - Keep It Simple Stupid
Neser вне форума
Старый 05.01.2011, 21:52   #5
Sabin4ik
Пользователь
 
Регистрация: 03.01.2011
Сообщений: 80
По умолчанию

Цитата:
Сообщение от Юра Кадников Посмотреть сообщение
Условный оператор.
Значение переменных X,Y,Z поменять местами так, чтобы оказались упорядочённые по возрастанию.
.


#include<stdio.h>
void main(void)
{
int mas[3];
int i,j;
int buf;
printf("Vvedite 3 4isla X,Y,Z\n");
for(i=0;i<3;i++)
scanf("%d",&mas[i]);
for(i=0;i<3;i++)
{
for(j=0;j<3;j++)
{
if(mas[i]<mas[j])
{
buf=mas[i];
mas[i]=mas[j];
mas[j]=buf;
}
}
}
for(i=0;i<3;i++)
printf("%d",mas[i]);
}
Хорошо, Java, ВОЗМОЖНО, хороший пример того как должен выглядеть язык. Но тогда программы на Java — это хороший пример как НЕЛЬЗЯ писать программы
Sabin4ik вне форума
Старый 05.01.2011, 21:53   #6
Sabin4ik
Пользователь
 
Регистрация: 03.01.2011
Сообщений: 80
По умолчанию

хах) черт опередили)))
Хорошо, Java, ВОЗМОЖНО, хороший пример того как должен выглядеть язык. Но тогда программы на Java — это хороший пример как НЕЛЬЗЯ писать программы
Sabin4ik вне форума
Закрытая тема


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
непонимаю как сделать эту задачу может листинг мне нужен(решение) Юра Кадников Помощь студентам 0 05.01.2011 19:59
задачи по делфи как cделать. нужен ток листинг Юра Кадников Помощь студентам 2 04.01.2011 19:55
не могу понять как решать задачи по паскалю! aiktz Помощь студентам 10 11.03.2009 16:43