Технический форум
Вернуться   Технический форум > Программирование > Форум программистов > Помощь студентам


Ответ
 
Опции темы Опции просмотра
Старый 29.10.2012, 19:02   #1 (permalink)
samanta7573620
Новичок
 
Регистрация: 29.10.2012
Сообщений: 4
Сказал(а) спасибо: 0
Поблагодарили 0 раз(а) в 0 сообщениях
Репутация: 10
По умолчанию Организация доступа к динамической памяти

Помогите!
Опишите тип данных: указатель на данные типа string. Объявите переменные a, b названного типа. Выделите в динамической памяти участки, достаточные для размещения двух переменных типа string (применить разные способы). Введите в созданные динамические переменные некоторые значения. Выведите их на экран. Присвойте одному из указателей значение другого указателя (Какие предварительные действия нужно сделать? Осуществите их). Выведите значения динамических переменных на экран.


Вот сама программа.. Её надо поправить, с условиями задания.


Program KO;
var a,b,c,d,x1,x2: real;
begin
repeat
writeln ('Vvedi koeficent KO (a<>0');
write ('a='); readln (a);
write ('b='); readln (b);
write ('c='); readln (c);
until a<>0;
d:=b*b-4*a*c;
if d<0 then writeln ('net korney')
else begin
x1:=(-b+sqrt(d))/(2*a);
x2:=(-b-sqrt(d))/(2*a);
writeln ('x1=',x1:5:2,'x2=',x2:5:2)
end;
readln;
end.




samanta7573620 вне форума   Ответить с цитированием

Старый 29.10.2012, 19:02
Helpmaster
Member
 
Аватар для Helpmaster
 
Регистрация: 08.03.2016
Сообщений: 0

Информация содержащаяся в схожих темах безусловно вам будет полезна

Организация интернета
Организация ветвления
Организация ветвления. Помогите
С# Организация циклов
Организация охлаждения для Wi-Fi роутера

Старый 29.10.2012, 20:41   #2 (permalink)
Vladimir_S
Специалист
 
Регистрация: 27.08.2008
Адрес: Санкт-Петербург
Сообщений: 27,807
Сказал(а) спасибо: 340
Поблагодарили 583 раз(а) в 208 сообщениях
Репутация: 113184
По умолчанию

Да... хотел бы я знать, какое отношение имеет приведенная программа решения квадратного уравнения к сформулированному заданию? По-моему, ну просто ни малейшего.
Ох уж эти "маленькие студенческие хитрости"...
Vladimir_S вне форума   Ответить с цитированием
Старый 29.10.2012, 21:47   #3 (permalink)
samanta7573620
Новичок
 
Регистрация: 29.10.2012
Сообщений: 4
Сказал(а) спасибо: 0
Поблагодарили 0 раз(а) в 0 сообщениях
Репутация: 10
По умолчанию

Первое задание было:Определить: с какими переменными возможно и желательно работать как с динамическими? Изменить программу, включив работу с динамическими переменными.
Это решила.
Program KO;
var a,b,c,d: real; x1, x2: ^ real;
begin
repeat
writeln ('Vvedi koeficent KO (a<>0');
write ('a='); readln (a);
write ('b='); readln (b);
write ('c='); readln (c);
until a<>0;
new (x1); getmem (x2,1);
d:=b*b-4*a*c;
if d<0 then writeln ('net korney')
else begin
x1^:=(-b+sqrt(d))/(2*a);
x2^:=(-b-sqrt(d))/(2*a);
writeln ('x1=',x1^:5:2,'x2=',x2^:5:2)
dispose (x1); freemem (x2,1);
end;
readln;
end.

А второе задание направлено на переменные a, b. Их надо задать как динамические типа string.
samanta7573620 вне форума   Ответить с цитированием
Ads

Яндекс

Member
 
Регистрация: 31.10.2006
Сообщений: 40200
Записей в дневнике: 0
Сказал(а) спасибо: 0
Поблагодарили 0 раз(а) в 0 сообщениях
Репутация: 55070
Ответ

Опции темы
Опции просмотра

Ваши права в разделе
Вы не можете создавать новые темы
Вы не можете отвечать в темах
Вы не можете прикреплять вложения
Вы не можете редактировать свои сообщения

BB коды Вкл.
Смайлы Вкл.
[IMG] код Выкл.
HTML код Выкл.
Trackbacks are Вкл.
Pingbacks are Вкл.
Refbacks are Выкл.




Часовой пояс GMT +4, время: 00:04.

Powered by vBulletin® Version 6.2.5.
Copyright ©2000 - 2014, Jelsoft Enterprises Ltd.