Запишите программу ** языке Паскаль для: а) значение функции y=x2 для заданного значения...

0 голосов
56 просмотров

Запишите программу на языке Паскаль для: а) значение функции y=x2 для заданного значения переменной x=12.4
б) площади прямоугольника, заданного своими смежными сторонами a=15, b=16.3 Помогите пожалуйста


Информатика (18 баллов) | 56 просмотров
Дан 1 ответ
0 голосов

Если в первом примере y=x^2( X в квадрате), то программа будет выглядеть следующим образом: Program pr1;
var y,x:real;
begin
writeln('Введите значение x');
readln(x);
y:=sqr(x);
writeln('Ответ:', y);
end.

Если же у тебя в первом функция y=x*2 ( X умножить на 2), то программа будет выглядеть так:

Program pr1;
var y,x:real;
begin
writeln('Введите значение x');
readln(x);
y:=x*2;
writeln('Ответ:', y);
end.


2. Program pr2;
var a,b,S:real;
begin
writeln('Введите сторону a');
readln(a);
writeln('Введите сторону b');
readln(b);S:=a*b;
writeln('Ответ:', S);
end.

(24 баллов)
0

Если в первом примере y=x^2( X в квадрате), то программа будет выглядеть следующим образом:

0

Program pr1;
var y,x:integer;
begin
writeln('Введите значение x');
readln(x);
y:=sqr(x);
writeln('Ответ:', y);
end.