Ответы на вопрос:
Каждый знак - это 1 байт. посчитай количество знаков в слове и умножь его на 8. у меня получилось 128.
program p1; usescrt; varx,y : real; begin
clrscr;
x : = -1;
writeln('');
while x < = 1 do begin
y : = 1/x+2;
x : = x + 0.1;
writeln(y);
end;
writeln('');
writeln('');
x : = 0;
writeln('');
while x < = 3.8 do begin
if (x < > 0) and (1/(2*x)-1 > = 0) then y : = sqrt(1/(2*x)-1)+2 else writeln('pri x = ',x,' ne opredelena');
x : = x + 0.1;
writeln(y);
end;
writeln('');
readln; readln;
end.
Популярно: Информатика
-
Ksu1ma14.06.2020 15:53
-
Morkvap503.07.2020 10:15
-
aalenka59215.02.2020 21:16
-
Arthas121252323.06.2020 08:53
-
089280ig07.06.2020 21:48
-
botvinaanna8018.04.2022 07:46
-
Typre3502.12.2020 22:08
-
nikaa552224.05.2022 16:17
-
Prinsseska200425.09.2021 08:41
-
Vero2326.02.2021 18:32