<span>программа (exe)
</span><span>текстовый документ(txt)
</span><span>рисунок или фотография (bmp)
</span><span>Музыка (mp3)</span>
Пустой лист - "создать"; (скорее всего это и имели ввиду)
Дискета - "сохранить";
Дискета с карандашом - "сохранить как"
Program pr1;
Var s,k,k1,k2: integer;
Begin
write('Задайте начальное и конечное значения параметра цикла: ');
readln (k1,k2);
s:=0;
for k:=k1 to k2 do
begin
s:=s+6;
writeln(s);
end
End.
Умножаем как обычно в столбик 11011*101=10000111
Ответ:
Объяснение:
var
x, y:real;
begin
//x:=5;
readln(x);
if (x < -1) then y:=x+2;
if ((x >= -1) and (x <= 2)) then y:=x*x;
if (x > 2) then y:=6-x;
writeln(y);
end.