Консультация № 191803
19.11.2017, 20:29
0.00 руб.
0 5 1
Уважаемые эксперты! Пожалуйста, ответьте на вопрос:Решить и запрограммировать задачу на языке Турбо Паскаль (ТР) на тему «Циклические и разветвляющиеся вычислительные процессы» с протоколом оформления решения задачи: "Вычислить и напечатать значения функции и соответствующие им значения аргументов x, y. z=2xy-2yx при изменении первого аргумента x[-1;1] с шагом 0.1 и второго аргумента y[2;2] с шагом 0.2."

Обсуждение

давно
Старший Модератор
31795
6196
20.11.2017, 13:31
общий
Адресаты:
Цитата: olja_12111983
и второго аргумента y[2;2] с шагом 0.2.

Наверное -2 : 2
Об авторе:
Мне безразлично, что Вы думаете о обо мне, но я рад за Вас - Вы начали думать.

давно
Старший Модератор
31795
6196
20.11.2017, 14:05
общий
Адресаты:
И формулу уточните, т.к. она не имеет смысла, всегда 0.0.
Об авторе:
Мне безразлично, что Вы думаете о обо мне, но я рад за Вас - Вы начали думать.

давно
Старший Модератор
31795
6196
20.11.2017, 17:10
общий
Адресаты:
Раз приходили на портал, тут уточните.
Об авторе:
Мне безразлично, что Вы думаете о обо мне, но я рад за Вас - Вы начали думать.

давно
Старший Модератор
31795
6196
20.11.2017, 18:24
общий
Адресаты:
сам протокол
Прикрепленные файлы:
063e6808d4fe3077980b9cbf5433953d.txt
Об авторе:
Мне безразлично, что Вы думаете о обо мне, но я рад за Вас - Вы начали думать.

давно
Старший Модератор
31795
6196
21.11.2017, 12:32
общий
это ответ
Здравствуйте, olja_12111983!

Цитата: olja_12111983
z=2xy-2yx

Формула не имеет смысла - всегда 0.0.
Цитата: olja_12111983
и второго аргумента y[2;2

Скорее всего имеется ввиду y[-2;2].
Соответственно сам код, с учетом комментариев:
[code lang=pascal]var
x,y:real;
begin
write('x\y':8);
y:=-2;
while y<2.1 do
begin
write(y:8:4);
y:=y+0.2;
end;
writeln;
x:=-1;
while x<1.1 do{цикл по Х}
begin
write(x:8:4);
y:=-2;
while y<2.1 do{цикл по У}
begin
{считаем странную формулу}
write((2*x*y-2*x*y):8:4);
y:=y+0.2;
end;
x:=x+0.1;
writeln;
end;
end.[/code]
Протокол работы в прикрепленном файле(3.8 кб).
Удачи!
Об авторе:
Мне безразлично, что Вы думаете о обо мне, но я рад за Вас - Вы начали думать.

Форма ответа