Ответы на вопрос:
program z1;
var x: real;
begin
readln(x);
x:=x/4;
if x>= 15 then
begin
x:=x+12;
if x>20 then
begin
x:=x*5;
x:=x-25
end
else
begin
x:=x*3;
x:=x+13
end
end
else
begin
x:=x+6;
if x>=10 then
begin
x:=x*11;
x:=x+24
end
else
begin
x:=x*4;
x:=x-8
end
end;
writeln (x)
end.
1. 20 (x = 4)
2. 220 (x = 148)
Объяснение:
Левая сторона - да, правая сторона - нет (относительно человека смотрящего на схему)
выразим размер файла в мб: 1562/1024=1,525мб
теперь узнаем сколько таких файлов поместится на компакт-диск
650/1,525=426 файлов это и есть ответ
Популярно: Информатика
-
vorobeowmikhai21.01.2023 23:59
-
Катя87027318.03.2022 19:47
-
Гуманитарий77705.09.2022 16:19
-
Nkpr01.06.2023 22:16
-
gadjimira14.05.2021 21:22
-
gogo3806.07.2020 10:21
-
pvi00o2mailru12.05.2023 17:00
-
CoRoLi0727.10.2022 06:57
-
Джеси12355606.08.2022 11:34
-
Ychenikpurple26.04.2023 04:00