как вариант:
var
a, b, h : integer;
begin
a := readInteger('введите a = ');
b := readInteger('введите b = ');
h := readInteger('введите h = ');
writeln('площадь поверхности стен равна ', 2*a*h+2*b*h);
end.
Блок-схема — графическое представление алгоритма. Она состоит из функциональных блоков, которые выполняют различные назначения (ввод/вывод, начало/конец, вызов функции и т.д.).
Var
x:real;
Begin
Write('x = '); Readln(x);
if (x > 5) then
Write('y = ', x*x + 1)
else
Write('y = ', 3 - x);
end.
Пример:
x = 4.5
y = -1.5
~~~~~~~
x = 6
y = 37
Ответ:
Код ниже
Объяснение:
with open(r"D:\num.txt", "r", encoding='utf-8') as source:
sum = 0
item = 0
for s in source:
sum += int(s)
item += 1
with open(r"D:\result.txt", "w", encoding='utf-8') as dest:
dest.write(str(sum / item))
ОС обеспечивает совместное функционирование всех устройств компьютера и предоставляет пользователю доступ к его ресурсам. Без неё мы не сможем пользоваться компьютером