Заказы "Сделайте все за меня"

**klasper** · 27 октября, 2010

да нет вы меня не мого не поняли, например вводишь в окне любое число от 1 до 6 типо 6 он тебе выдет школьник, вводишь любое чило от 6 до 19 он выдает ученик, и так далее, на ленте задали сделать а у меня чет не как не выходит присвоить не че (((

**Тролль** · 27 октября, 2010

klasper:

В ну очень примитивном виде это будет выглядеть так:

<html><head><title>Who are you?</title><script>age=prompt("Твой возраст?","");if(eval(age)<7)alert("Ты дошкольник!"); else if(eval(age)<19) alert("Ты ученик!");else if(eval(age)<60)alert("Ты работяга!");else alert("Ты пенсионер!");</script></head></html>

**klasper** · 27 октября, 2010

Спасибо Вам Огромное именно это я и хотел именно в примитивном виде.

очень выручили)

**Riki_Tiki_Tavi** · 7 ноября, 2010

Помогите пожалуйста решить задачу.

На языке С

Буду очень благодарен!

**ArniLand** · 8 ноября, 2010

Написать программу на языке программирования Java2, осуществляющей анализ алгоритмов согласно варианту.

Выполните анализ эффективности алгоритмов последовательного и бинарного поиска данных в одномерном упорядоченном массиве размерностью М, М2, М3 (массив инициируется генератором случайных значений).

Как я понимаю, это нужно сделать с помощью встроенного метода System.nanotime(), но не знаю как это правильно сделать. Выкладываю, то что смог написать. Помогите пожалуйста организовать это в моей программе.

public static void main(String[] args) {	System.out.println("Введите М: ");	Scanner in = new Scanner(System.in);	int M = in.nextInt();}static int[] array1 (int M){	int[] a = new int[M];	Random r = new Random();	for (int i = 0; i < M; i++)		a[i] =  r.nextInt();	return a;}public static int linearSearch(int array1[], int first, int upto, int key) {for (int i = first; i < upto; i++) {	if (key == array1[i]) {		return i;  	}}return -1;} static int binSearch(int array1[], int el) {	if (array1.length == 0) {		return 0;	}	if (array1[array1.length - 1] < el) {		return array1.length;	}	int i = 0;	int j = array1.length;	while (i + 1 < j) {		int middle = i + (j - i) / 2;		if (array1[middle] >= el) {			j = middle;		} else {			i = middle;		}	}	return array1[i] >= el ? i : j;}}

**Тролль** · 8 ноября, 2010

Riki_Tiki_Tavi:

#include<stdio.h>main(){long i,j=0,k; scanf("%ld",&k); i=k; do j=i%10+j*10; while(i/=10); printf("palindrom-number: %s\n",k==j?"yes":"no"); getchar(); getchar();}

**Leond** · 11 ноября, 2010

привет всем)))

задачка)))на си)))

На входе строка с числом в шестнадцатиричной форме. Распознать строку в переменную типа int. На выходе строки с введенным числом в двоичной, восьмиричной и десятичной форме printf("%s",char *).

**Leond** · 11 ноября, 2010

привет всем)))

задачка)))на си)))

На входе строка с числом в восьмеричной форме. Распознать строку в переменную типа int. На выходе строки с введенным числом в двоичной, десятичной и шестнадцатиричной форме printf("%s",char *).

написать не через printf и scanf то есть не исользовать их в качестве перевод

**temich5000** · 15 ноября, 2010

Привет всем !!!!!!!!!!!!!!!

Очень нужна помощь в написании данной программы на си#(сишах) в вижуал студио

Задание:

Разроботать приложение калькулятор

Только начал изучать и уже задание дали…

Буду очень признателен

**chibi** · 22 ноября, 2010

Помогите пожалуйста с решением задач на Pascal

заранее спасибо1.дано натурально n вычислить sqrt(2+(sgrt(2+...(sqrt2)))) , где n-количество корней корней.

2.x1=0.3 x2=-0.3 xi=i+sin(Xi-1) * i-2 - нижний индекс числа x* s=3,4....

среди х1......х100 найти ближайшее к какому нибудь целому

3.даны натуральное число n и целые числа а1....а25, b1......bn И там и там нет повторяющихся чисел.

верно ли что все члены а1....а25 входят в b1......bn? :blink:

**core_st** · 24 ноября, 2010

Здраствуйте. Помогите з Асемблером, если есть знатоки. Tasm 4.0. Написать програму, которая выводить строку на 20 символов в виде квадрата (ну на вид ето прямоугольник, но по количеству символов в грани - квадрат). Например:'asdfasdfasdfasdfasdf' (20 символов):

asdfasf    dd    fs    aa    sfdsafd

Изменено 24 ноября, 2010 пользователем core_st

**core_st** · 24 ноября, 2010

Здраствуйте. Помогите з Асемблером, если есть знатоки. Tasm 4.0. Написать програму, которая выводить строку на 20 символов в виде квадрата (ну на вид ето прямоугольник, но по количеству символов в грани - квадрат). Например:'asdfasdfasdfasdfasdf' (20 символов):
asdfasf    dd    fs    aa    sfdsafd

Часть задания сделал. Теперь нужно только правильно курсор перемещать

%TITLE "Lab6"IDEALMODEL small STACK 256DATASEGexCode DB 0Msg DB 'algpembuqwobnzcbtphmdlepgmcuqpbmditkglblsyqitmboaltibnqplmstgaqt',13,10,'$'CODESEGStart:mov ax, @Datamov ds,axmov cx,64mov di,offset Msgmov	ah,02h		print:mov	dl,[di]int 21hinc didec cx;здесь нужно курсор переместитьjnz printExit:mov ah,04Chmov al,[exCode]int 21hEND Start

**Тролль** · 24 ноября, 2010

chibi:

1.дано натурально n вычислить sqrt(2+(sgrt(2+...(sqrt2)))) , где n-количество корней корней.

var i,n:word; r:real; begin readln(n); r:=0; for i:=1 to n do r:=sqrt(r+2); writeln®; readln end.

2.x1=0.3 x2=-0.3 xi=i+sin(Xi-1) * i-2 - нижний индекс числа x* s=3,4....

Что за формула, не понял.

3.даны натуральное число n и целые числа а1....а25, b1......bn И там и там нет повторяющихся чисел.
верно ли что все члены а1....а25 входят в b1......bn?

const m=25;var a:array[1..m]of integer; b:array[1..100]of integer; s:array[1..m]of boolean; i,j,n:integer; k:boolean;begin write('array a ? '); for i:=1 to m do read(a[i]); readln;write('n ? '); readln(n); write('array b ? '); for i:=1 to n do read(b[i]); readln;for i:=1 to m do s[i]:=false; k:=true; for j:=1 to n do for i:=1 to m do if b[j]=a[i] then s[i]:=true;for i:=1 to m do k:=k and s[i]; writeln(k); readlnend.

**ts@ndr** · 26 ноября, 2010

Может есть у кого программа управления движением курсора по нажатию соответственных клавиш на Ассемблере

**Inconstantia** · 27 ноября, 2010

1.В заданном тексте заменить все вхождения ‘ed’ на ‘ing’.

2.Из заданного текста удалить последовательность символов, расположенных между двумя парными двоеточиями.

3.В заданном тексте перед каждой цифрой, за которой стоит пробел вставить знак ‘+’.

пожалуйста помогите..

**Riki_Tiki_Tavi** · 28 ноября, 2010

Помогите пожалуйста решить на языке С с использованием enum.

Дано дату у вигляді числа і місяця (наприклад, 12 травня) і ця дата припала на день тижня – четвер. Крім того, дано натуральне число k. Вивести назву дня, місяця і сезону, які були за k днів перед даною датою. Вважати рік невисокосним.

Дано дату в виде числа и месяца (например, 12 мая) и эта дата пришлась на день недели - четверг. Кроме того, дано натуральное число k. Вывести название дня, месяца и сезона, которые были за k дней перед данной дате. Считать год невисокосным.

**Тролль** · 29 ноября, 2010

Riki_Tiki_Tavi:

Ну там травня или мая, не знаю, в программе буду вводить и выводить просто номера месяцев. Да и сезона тоже. В случае чего можно занести в массив названия месяцев и пробежаться по нему, определяя номер месяца, соответствующий названию, если это нужно. То же с сезоном.

enum вообще никогда никому не нужен, это просто замена порядковых чисел в программе придуманными для них названиями, причем только внутри программы, на ввод-вывод не влияет, это все равно остаются целые числа. Однако куда-нибудь втащу, раз требуют.

#include<stdio.h>int main(){enum corr{nul,one}cor; int i,j,k,l,z,mon,day,m[12]={31,28,31,30,31,30,31,31,30,31,30,31};  printf("day month backshift: "); scanf("%d%d%d",&day,&mon,&z);k=0; for(i=0;i<12;i++)for(j=0;j<m[i];j++){k++; if(i+one==mon && j+one==day)goto met;}met:l=k-z; if(l<0)l+=365; k=0; for(i=0;i<12;i++)for(j=0;j<m[i];j++){k++; if(k==l)goto med;}  med:printf("day:%d  month:%d  season:%d\n",j+one,i+one,i/3+one); getchar(); getchar(); return 0;}

Вводятся через пробел три числа, например, 15 5 20

Это означает отсчитать от 15 мая 20дней назад.

**RastLine** · 1 декабря, 2010

Доброго времени суток. Помогите пожалуйста двоечнику. =) Нужно сделать три лабы на языке Pascal.

Прикрепляю файлик вордовский, там какие лабы нужны,в них выделен большими цифрами 18 вариант. Буду очень признателен. если хотя бы одну из них вы поможете сделать. Заранее спасибо. :)

Копия Turbo Pascal.doc

**Тролль** · 2 декабря, 2010

RastLine:

Помогите пожалуйста двоечнику.

Ну, вообще-то так характеризовать себя не следует. Двоечникам надо не помогать, а "топить" их. Зачем помогать человеку, который учиться не хочет? Ему надо помочь бросить это дело. Вот когда человек старается и не получается - другое дело.

Впрочем, у вас институт, похоже, специально для двоечников. Сделать в простеньком образцовом примере, который у вас в методичке, десяток ошибок - не всякий преподаватель и даже не всякий двоечник способен. Это, по-моему, только шимпанзе было бы по силам. У вас препод не шимпанзе?

Так или иначе,

Задание 1.

var x:real; begin readln(x); writeln(x*x*x/sqrt(3)-exp(x)*ln(abs(1.37*1.37*1.37+x*x*x))+4/3); readln end.

Задание 2.Предупреждаю - на примере, в котором в методичке предлагается провести контрольный подсчет, ничего хорошего не получится, функция при этих данных, как легко убедиться ручной подстановкой значений, просто не существует. Пришлось предусматривать проверку на существование функции.

var i,n:integer; a,b,s,x,f:real;begin write('n a b ? '); readln(n,a,b); s:=(b-a)/(n-1); for i:=1 to n do begin x:=a+(i-1)*s; if x<0 then begin f:=16*sqr(sqr(a))+(4*a*a-1)*sqr(x+a)-a;   if f<0 then writeln(x:10:5,' function does not exist')   else writeln(x:10:5,-sqrt(sqrt(f)):10:5) end else begin f:=a*a-sqr(x+a);   if f<0 then writeln(x:10:5,' function does not exist')   else writeln(x:10:5,sqrt(f)-2*a:10:5); end;end;readlnend.

Задание3.

var i,j,n:integer; a,b,p,s,x,f:real;beginwrite('n a b ? '); readln(n,a,b); p:=(b-a)/(n-1);for i:=1 to n do begin x:=a+(i-1)*p; s:=0; f:=-1; j:=0;repeat inc(j); f:=-x*(j+1)/sqr(j)*f; s:=s+f;until (abs(f)<1e-8*abs(s))or(j>50);writeln(x:10:5,s:15:8, (x-1)*exp(-x)+1:15:8); end; readlnend.

Изменено 2 декабря, 2010 пользователем Тролль

**temich5000** · 3 декабря, 2010

Привет

Помогите пожалуйста немного доработать мой калькулятор

Вот code

decimal a,s,b;

Boolean g, l, m, n;

char Zap = '0';

private void button10_Click(object sender, EventArgs e) (кнопка «,»)

{

if (Zap == '0')

{

textBox1.Text = textBox1.Text + ",";

Zap = '1';

}

else textBox1.Text = textBox1.Text;

}

private void button13_Click(object sender, EventArgs e)(кнопка +)

{

a = Convert.ToDecimal(textBox1.Text);

textBox1.Text = "";

g = true;

Zap = '0';

}

private void button14_Click(object sender, EventArgs e) (кнопка -)

{

a = Convert.ToDecimal(textBox1.Text);

textBox1.Text = "";

l = true;

Zap = '0';

}

private void button15_Click(object sender, EventArgs e) (кнопка *)

{

a = Convert.ToDecimal(textBox1.Text);

textBox1.Text = "";

m = true;

Zap = '0';

}

private void button16_Click(object sender, EventArgs e) (кнопка /)

{

a = Convert.ToDecimal(textBox1.Text);

textBox1.Text = "";

n = true;

Zap = '0';

private void button17_Click(object sender, EventArgs e) (кнопка =)

{

b = Convert.ToDecimal(textBox1.Text);

if (g == true) s = a + b;

if (l == true) s = a - b;

if (m == true) s = a * b;

if ((n == true) && (b != 0)) s = a / b;

else

textBox1.Text = "del";

textBox1.Text = Convert.ToString(s);

g = false;

l = false;

m = false;

n = false;

Нужно чтобы при делении на ноль высвечивалось сообщение деление на ноль.

И например 12+3=15 и при нажатии ещё раз копки равно высвечивалось бы число 18

**Тролль** · 4 декабря, 2010

temich5000:

А почему не написать

if (b == 0)textBox1.Text = "overflow"; else s = a / b;

И можно было вводить не четыре логических переменных, а одну целую и присваивать ей значения 1..4.

**RastLine** · 5 декабря, 2010

Большое спасибо)) А препод на самом деле шимпанзе)))

**chibi** · 5 декабря, 2010

Доброго времени суток, помогите пожалуйста решить задачу на 2хмерный массив.

Дана действительная матрица размером NxM.Получить последовательность

b.....b[n].где b[k] это число отрицательных элементов в Ктой строке.

**temich5000** · 5 декабря, 2010

а как сделать чтобы

например 12+3=15 и при нажатии ещё раз копки равно высвечивалось бы число 18

и 12/3=4 и при нажатии ещё раз копки равно высвечивалось бы число 1,3333333333

**Тролль** · 5 декабря, 2010

temich5000:

У тебя приведена только часть программы, так что неясно, что делается в остальной ее части, но кнопка "=" тогда не должна делать сброс запомненной операции. Запомненная операция и введенное в b число при нажатии этой кнопки должны оставаться неизменными, а значение a должно меняться на s. Тогда при повторном нажатии "=" операция повторится уже с новым значением a.

chibi:

var i,j,m,n:integer; a:array[1..25,1..25]of real; b:array[1..25]of integer; beginwriteln('Введите размерности матрицы (через пробел) N M : '); readln(n,m);for i:=1 to n dobegin writeln('Введите элементы ',i,'-й строки, разделяя пробелами'); for j:=1 to m do read(a[i,j]); readln;end;for i:=1 to n do begin b[i]:=0; for j:=1 to m do if a[i,j]<0 then inc(b[i]) end; writeln('Result:'); for i:=1 to n do write(b[i]:4); writeln; readln end.

Изменено 6 декабря, 2010 пользователем Тролль

Заказы "Сделайте все за меня"

Рекомендуемые сообщения

Ссылка на комментарий

Поделиться на другие сайты

Топ авторов темы

Популярные дни

Топ авторов темы

Популярные дни

Популярные посты

Shurr

Тролль

Тролль

Изображения в теме

Ссылка на комментарий

Поделиться на другие сайты

Ссылка на комментарий

Поделиться на другие сайты

Ссылка на комментарий

Поделиться на другие сайты

Ссылка на комментарий

Поделиться на другие сайты

Ссылка на комментарий

Поделиться на другие сайты

Ссылка на комментарий

Поделиться на другие сайты

Ссылка на комментарий

Поделиться на другие сайты

Ссылка на комментарий

Поделиться на другие сайты

Ссылка на комментарий

Поделиться на другие сайты

Ссылка на комментарий

Поделиться на другие сайты

Ссылка на комментарий

Поделиться на другие сайты

Ссылка на комментарий

Поделиться на другие сайты

Ссылка на комментарий

Поделиться на другие сайты

Ссылка на комментарий

Поделиться на другие сайты

Ссылка на комментарий

Поделиться на другие сайты

Ссылка на комментарий

Поделиться на другие сайты

Ссылка на комментарий

Поделиться на другие сайты

Ссылка на комментарий

Поделиться на другие сайты

Ссылка на комментарий

Поделиться на другие сайты

Ссылка на комментарий

Поделиться на другие сайты

Ссылка на комментарий

Поделиться на другие сайты

Ссылка на комментарий

Поделиться на другие сайты

Ссылка на комментарий

Поделиться на другие сайты

Ссылка на комментарий

Поделиться на другие сайты

Для публикации сообщений создайте учётную запись или авторизуйтесь

Создать учетную запись

Войти

Последние посетители 0 пользователей онлайн

Объявления