|
|
Регистрация Восстановить пароль |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
18.03.2018, 18:37 | #1 |
Регистрация: 01.03.2018
Сообщений: 8
|
Вычисление конечных сумм и произведений
(Делфи)Задача:
Вычислить сумму и произведение: Безымянный33.png где і-номер варианта. Функция z=5*x-2*y. Вычислить значение выражения z и вывести х,у,z. Начала, но не получается procedure TForm1.Button1Click(Sender: TObject); const i=13; var z:real; y: real; x: real; st: string; // èçîáðàæåíèå òàáëèöû begin st:=''; x := 1; y:=1; dx := 0.5; for i:=1 to 18 do z := 5*x -2*y; st := st+ FloatToStr(x)+' '+ FloatToStr(y)+chr(13); end; Label1.Caption end; end. Последний раз редактировалось Nassylbekova; 18.03.2018 в 18:40. |
18.03.2018, 21:16 | #2 |
Старожил
Регистрация: 04.02.2011
Сообщений: 4,619
|
Какая-то z#@&%%, а не задача : функция от 2 переменных, а в вычисляемых циклах - от одной (k). Колесо от трактора Беларус для Боинга 767 ?
|
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
№2. Вычисление сумм и произведений | Kolyanich | Паскаль, Turbo Pascal, PascalABC.NET | 2 | 24.09.2013 13:30 |
Вычисление сумм и произведений | Kolyanich | Паскаль, Turbo Pascal, PascalABC.NET | 3 | 21.09.2013 17:43 |
Исчисление сумм и произведений | PowerPoint | Паскаль, Turbo Pascal, PascalABC.NET | 1 | 21.01.2013 08:30 |
вычисление конечных сумм в Паскале. | lammy | Помощь студентам | 8 | 10.03.2010 13:48 |
Вычисление конечных сумм. паскаль. | lammy | Помощь студентам | 2 | 05.03.2010 13:49 |