Ребят очень Информатика процедуры и функции для работы с символьными и строковыми величинами. Вопрос 1,2,3,4
282
401
Ответы на вопрос:
1) var
y,x: real;
begin
writeln('введите значение x: ');
readln(x);
y: =5/(2*sqr(x)-50);
writeln('y = ',y);
end.
2) var
y,x: integer;
begin
writeln('введите значение x: ');
readln(x);
writeln('введите значение y: ');
readln(y);
if x> y then
begin
writeln('x*2 = ',x*2)
end
else
if (x
begin
writeln('x*2 = ',x*2);
writeln('y*2 = ',y*2);
end;
end.
Популярно: Информатика
-
ВасилисаВозгесенская28.05.2021 12:45
-
Pidoraser18.07.2021 18:42
-
даша281619.11.2021 18:00
-
Shkolяr02.10.2021 02:31
-
Татьяна7282818.02.2022 00:08
-
mansurmusaev9121.09.2022 00:28
-
Lootfarm08.02.2020 06:32
-
KsennyTAR19.05.2023 04:01
-
serbakovasvetas15.01.2023 05:32
-
zofiaoxd1zb20.07.2022 17:39