Home
О нас
Products
Services
Регистрация
Войти
Поиск
sasha23191
@sasha23191
July 2022
2
5
Report
Вычислить Значения Функции Паскаль.
Срочно нужен ответ.
Please enter comments
Please enter your name.
Please enter the correct email address.
Agree to
terms of service
You must agree before submitting.
Send
Answers & Comments
wasdPror
Program a1;
var x,f: real;
beginreadln (x);
if x<=0 then f:=x*x else f:=x/10;
writeln ('f=',f);
end.
1 votes
Thanks 1
Студэнt
//прога на Pascal`e
var
x: real;
function f (a:real):real;
begin
if a<=0 then f:=sqr(a) else f:=a/10;
end;
begin
write ('Введите x: ');
readln (x);
write ('f(', x, ') = ', f(x) );
end.
0 votes
Thanks 1
More Questions From This User
See All
sasha23191
August 2022 | 0 Ответы
vychislit summu naturalnyh chiselkratnyh 3menshuyu 100paskal
Answer
sasha23191
August 2022 | 0 Ответы
dany tri chislaab i c najti raznost naibolshego i naimenshego iz nih
Answer
sasha23191
July 2022 | 0 Ответы
dany tri chislaab i copredelite znacheniya naimenshego iz nih
Answer
sasha23191
July 2022 | 0 Ответы
sostavit 5 voprosov k 9 10 glaveproizvedenie ubityj pod moskvoj
Answer
sasha23191
July 2022 | 0 Ответы
postrojte grafik funkcij55d8539250e7128253bb6867c5254bfc 75956
Answer
sasha23191
July 2022 | 0 Ответы
po zadannomu vremeni t ukazhite vremya sutokutrodenvechernoch
Answer
sasha23191
July 2022 | 0 Ответы
dano chislo aesli ono odnoznachnoeto umnozhit ego na 3esli trehznachnoe razdel
Answer
sasha23191
July 2022 | 0 Ответы
najti storony pryamougolnika esli odna bolshe drugoj na 14 sma diagonal rovna
Answer
sasha23191
October 2021 | 0 Ответы
s klaviatury vvodetmya massia iz n celyh chiselsostavit programmu i vyvesti nae5837fe371f172a433dea5f680f99d14 76465
Answer
sasha23191
October 2021 | 0 Ответы
s klaviatury vvodetmya massia iz n celyh chiselsostavit programmu i vyvesti na
Answer
рекомендуемые вопросы
rarrrrrrrr
August 2022 | 0 Ответы
o chem dolzhny pozabotitsya v pervuyu ochered vzroslye pri organizacionnom vyvoze n
danilarsentev
August 2022 | 0 Ответы
est dva stanka na kotoryh vypuskayut odinakovye zapchasti odin proizvodit a zapcha
myachina8
August 2022 | 0 Ответы
najti po grafiku otnoshenie v3v1 v otvetah napisano 9 no nuzhno reshenie
ydpmn7cn6w
August 2022 | 0 Ответы
Choose the correct preposition: 1.I am fond (out,of,from) literature. 2.where ar...
millermilena658
August 2022 | 0 Ответы
opredelite kak sozdavalas i kto sozdaval arabskoe gosudarstvo v kracii
MrZooM222
August 2022 | 0 Ответы
ch ajtmanov v rasskaze krasnoe yabloko ispolzuet metod rasskaz v rasskaze opi
timobila47
August 2022 | 0 Ответы
kakovo bylo naznachenie kazhdoj iz chastej vizantijskogo hrama pomogite pozhalujsta
ivanyyaremkiv
August 2022 | 0 Ответы
moment. 6....
pozhalujsta8b98a56c0152a07b8f4cbcd89aa2f01e 97513
sarvinozwakirjanova
August 2022 | 0 Ответы
pomogite pozhalusto pzha519d7eb8246a08ab0df06cc59e9dedb 6631
×
Report "Вычислить Значения Функции Паскаль. Срочно нужен ответ..."
Your name
Email
Reason
-Select Reason-
Pornographic
Defamatory
Illegal/Unlawful
Spam
Other Terms Of Service Violation
File a copyright complaint
Description
Helpful Links
О нас
Политика конфиденциальности
Правила и условия
Copyright
Контакты
Helpful Social
Get monthly updates
Submit
Copyright © 2024 SCHOLAR.TIPS - All rights reserved.
Answers & Comments
var x,f: real;
beginreadln (x);
if x<=0 then f:=x*x else f:=x/10;
writeln ('f=',f);
end.
var
x: real;
function f (a:real):real;
begin
if a<=0 then f:=sqr(a) else f:=a/10;
end;
begin
write ('Введите x: ');
readln (x);
write ('f(', x, ') = ', f(x) );
end.