1) - Гбайт (самый большой, гига это
)
2)- Мбайт (1024 кбайта)
3)- кбайт (1024 байта)
4) - байт ( это 8 битов)
5) - бит - малейшая единица информации.
Пусть обь и восток - пароходы 1 и 2
мир и енисей - 3 и 4
решение в картинках во вложении.
//Pascal ABC.NET 3.1 сборка 1256
Var
s:string;
a,b:real;
begin
readln(s);
a:=strtofloat(copy(s,1,pos('X',s)-1));
b:=strtofloat(copy(s,pos('=',s)+1,length(s)-pos('=',s)));
if (a=0) and (b=0) then
begin
writeln('X-любое действительное число');
exit;
end
else
if a=0 then
begin
writeln('Нет корней');
exit;
end;
writeln(b/a);
end.
Пример ввода:
-0.1X=10
Пример вывода:
-100