Регистрация
niagara4
31.01.2022 12:10
Информатика
Есть ответ 👍

Больше нет , сделайте это на онлайн паскале! Сделайте фото кода!
Составить блок-схему алгоритма и программу на языке Паскаль для вычисления значения функций y(x) = 2(х + |(x - 1)2|). Ввести программу, вычислить значение функции и проверить полученный результат. На проверку нужно прислать текст кода программы, результат работы кода в виде скриншота окна программы с отображением кода и полученного результата. Входные данные задайте самостоятельно. Программная реализация обязательна!

208
416
Посмотреть ответы 2

Ответы на вопрос:

HeliaK
HeliaK
4,6(9 оценок)

блок-схема - скрин 1

program z;

var x,y:real;

begin

write('x = ');

readln(x);

y:=2*(x + abs(sqr(x-1)));

write('y = ',y:0:1)

end.

результат - скрин 2

Объяснение:

y(x) = 2(x + |(x-1)^{2} |)

вводим x

вычисляем y

выводим y


Больше нет , сделайте это на онлайн паскале! Сделайте фото кода! Составить блок-схему алгоритма и пр
Больше нет , сделайте это на онлайн паскале! Сделайте фото кода! Составить блок-схему алгоритма и пр
ramzesrvc
ramzesrvc
4,5(59 оценок)

var a:array[1..100] of integer;

b,c,d:integer;

begin

c:=0;

d:=0;

for b:=1 to 100 do

begin

a[b]:=random(41)-30;

writeln('a[',b,']= ',a[b]);

if a[b]>0 then c:=c+1;

if a[b]<0 then d:=d+1;

end;

writeln('Количество положительных значений равняется ',c);

writeln('Количество отрицательных значений равняется ',d);

end.

5)

var  

int sum=0;

int kolmin=0;

arr=[0,15,12,–9,–8,58,45,36,–85,58,36,–45,2,3,25,–9];

for(i=0;i<16;i++){  

if(arr[i]>0){ sum+=arr[i];}

if(arr[i]<0){kolmin++;}

}

writeln('сумма + элементов = ',sum);

writeln('количество отрицательных элементов = ',kolmin);

end.

Объяснение:

Популярно: Информатика