Guest
Новичок
|
   
Помогите!
Как записать в Паскале корень 3-й степени из х?
|
Всего сообщений: Нет | Присоединился: Never | Отправлено: 14 окт. 2008 21:18 | IP
|
|
stossja
Новичок
|
help))
Скласти програму з використанням функції, в якій буде оголошено двовимірний масив, значення елементів якого будуть випадково вибрані числа.
|
Всего сообщений: 2 | Присоединился: октябрь 2008 | Отправлено: 14 окт. 2008 21:37 | IP
|
|
stossja
Новичок
|
Цитата: Guest написал 14 окт. 2008 21:18
Помогите!
Как записать в Паскале корень 3-й степени из х?
exp((1/3)*lnx)
|
Всего сообщений: 2 | Присоединился: октябрь 2008 | Отправлено: 14 окт. 2008 21:38 | IP
|
|
Guest
Новичок
|
Спасибо. Правильно ли будет такое выражение корень 3 степени из |x+1|=exp((1\30*ln|x+1|)
|
Всего сообщений: Нет | Присоединился: Never | Отправлено: 14 окт. 2008 22:06 | IP
|
|
Guest
Новичок
|
help))
Скласти програму з використанням функції, в якій буде оголошено двовимірний масив, значення елементів якого будуть випадково вибрані числа.
cмотри сюда
внешняя ссылка удалена
|
Всего сообщений: Нет | Присоединился: Never | Отправлено: 14 окт. 2008 22:24 | IP
|
|
Lusia
Новичок
|
Помогите пожалуйста с решением, условие вообще в голове не укладывается.
Дана непустая последовательность слов из строчных латинских букв, между соседними словами запятая, за последним словом точка.Напечатать все буквы, которые входят в наибольшее количество слов этой последовательности
|
Всего сообщений: 1 | Присоединился: октябрь 2008 | Отправлено: 18 окт. 2008 22:40 | IP
|
|
Nemesis
Новичок
|
При вызове функции выдает несоответствие типов.плс помогите уже башка кругом идет О_о
program lr8;
uses crt;
const
n=8;m=10;k=15;
a1=6;a2=5;b1=12;b2=2;c1=3;c2=11;d1=9;d2=4;
type mas=array [1..100] of real;mass=array [-10..20] of integer;
var
x,y,z,w:mas;sx,sy,sw:integer;min,s,i:integer;
function symm(r:mass):integer;
begin
s:=0;
min:=maxint;
for i:=-10 to 20 do
if r<min then
min:=r;
s:=s+min;
symm:=s;
end;
begin
clrscr;
writeln('':10,'Massiv x');
for i:=1 to n do begin
x:=a1*i*i-a2*(5-i);
write(x:8:2,'':4);
if i mod 5 = 0 then writeln;
end;
writeln;
writeln('':10,'Massiv y');
for i:=1 to n do begin
y:=b1*sin(2*i)+b2*exp(i-5);
write(y:8:2,'':4);
if i mod 5=0 then writeln;
end;
writeln;
writeln('':10,'Massiv z');
for i:=1 to m do begin
z:=c1*(i-4)+c2*sqr(sin(1.5*i));
write(z:8:2,'':4);
if i mod 5=0 then writeln;
end;
writeln;
writeln('':10,'Massiv w');
for i:=1 to k do begin
w:=d1*ln(0.1*i)+d2*cos(i-2.5)*cos(i-2.5)*cos(i-2.5);
write(w:8:2,'':4);
if i mod 5 = 0 then writeln;
end;
sx:=(symm(x));
writeln('symma x',sx);
sy:=(symm(y));
writeln('symma y',sy);
sw:=(symm(w));
writeln('symma w',sw);
s:=sx+sy+sw;
writeln('symma x,y,w',s);
readkey;
end.
|
Всего сообщений: 1 | Присоединился: октябрь 2008 | Отправлено: 19 окт. 2008 16:16 | IP
|
|
vStrelok
Новичок
|
Уважаемые мои!
Помогите решить дадону несколько элементарных задач по Паскалю! Моей благодарности не будет предела!
Задача1:
Составьте программу вычисления первых шести членов последовательности {An}, с общим членом An=n³
Задача2:
Составьте программу, представляющую данное натуральное число N в виде суммы степеней числа 2.
Задача3:
Составьте программу, выясняющую, можно ли представить данное натуральное число N ввиде суммы двух простых слагаемых.
Задача4(обработка строковых величин):
Составьте программу, вычеркивающую из слова X буквы, стоящие на четных местах.
Задача5(обработка строковых величин):
Составьте программу, выясняющую, имеются ли в слове X те буквы, что используются при написании слова Y.
Можно не все сразу.
Пишите если что в ICQ: 492787207
|
Всего сообщений: 1 | Присоединился: октябрь 2008 | Отправлено: 20 окт. 2008 14:27 | IP
|
|
wolfdail
Новичок
|
Дали тут задачки решить,а сам в Pascal "е не силен.Объясните кто сможет? Нужно написать полностью решение (расписать ) от начала до конца.
№1
Дана точка .Лежит ли она в кольце.
№2
Подсчет кол-во часов,минут,секунд в данном числе суток. n
№3
Определить растояние от точки до прямой.
Буду очень благодарен!Зарание спасибо!
|
Всего сообщений: 1 | Присоединился: октябрь 2008 | Отправлено: 21 окт. 2008 15:21 | IP
|
|
sriter
Новичок
|
 
Ребят помогите решить три задачки:
1. внешняя ссылка удалена
2. внешняя ссылка удалена
3. внешняя ссылка удалена
Заранее всех благодарю.
|
Всего сообщений: 1 | Присоединился: октябрь 2008 | Отправлено: 22 окт. 2008 20:03 | IP
|
|
|
Форум
Решение задач на Pascal. Форум 2
